* [misc]progress:  [Phase 1 of 3] Setting up.
* * * [misc]progress:  [1/2] Preparing points
* * * * [misc]points:  Sampling 256 additional inputs, on iter 0 have 0 / 256
* * * * [misc]points:  Computing exacts on every 16 of 256 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 8 of 256 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 4 of 256 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 2 of 256 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts for 256 points
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Filtering points with unrepresentable outputs
* * * * [exit]points:  Sampled 256 points with exact outputs
* * * [misc]progress:  [2/2] Setting up program.
* [misc]progress:  [Phase 2 of 3] Improving.
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (154 enodes)
* * [misc]simplify:  iters left: 2 (391 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * [misc]progress:  iteration 1 / 4
* * * [misc]progress:  picking best candidate
* [misc]none:  Fresh alts: 1
* [misc]none:  All alts: 1
* [misc]none:  Fresh alt: (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* [misc]none:  Fresh alt indexes
* [misc]none:  (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))): 0
* [misc]none:  Best fresh alt per point
* [misc]none:  (1.8269212298308998e+214 1789977963981.046 -1.7899154283931006e-62): 0
* [misc]none:  (1.6281717766697912e+39 3.5243641367880456e+86 -3.0008256032154172e-176): 0
* [misc]none:  (-7.986330642950897e-117 1.1611754700502491e-55 8.728226238434233e-64): 0
* [misc]none:  (-1.6133455999823373e+110 -3.9890484917100117e+257 -1.5117832743647305e-21): 0
* [misc]none:  (3.928924306566786e-70 5.222760300460367e-180 -4.026134204708055e+160): 0
* [misc]none:  (2.281413649637054e-166 4.156243175149629e-181 -9.231874857928986e-255): 0
* [misc]none:  (-1.65054043818576e-39 -1.0058709145515093e+290 -4.753699147196455e-118): 0
* [misc]none:  (-4.805584106456354e-282 -0.15058815983267834 3.714800492587865e+85): 0
* [misc]none:  (-4.7089063680709754e+260 4.344802098601123e-298 4.508329239962989e+257): 0
* [misc]none:  (-1.211264682641895e-292 1.0495684746531957e+167 2.721003254105153e-81): 0
* [misc]none:  (-3.0671153252781823e-63 -7.74362334743424e+32 -2.2376851712564295e-118): 0
* [misc]none:  (1.64239269831532e+149 -1.576948173228613e+33 9.680698928511806e-32): 0
* [misc]none:  (1.954959341132994e-252 -7.83347153590065e-06 5.521334390623478e-06): 0
* [misc]none:  (-3.229654932887624e+201 -9.827696191097834e-18 -1.3343140776153144e-304): 0
* [misc]none:  (-9.906575581428813e+195 7.10957194421701e+200 -4.7756557550151386e+160): 0
* [misc]none:  (2.4256946179069016e+78 6.207394963032113e+30 -7.218692088264328e+54): 0
* [misc]none:  (8.781920275794267e+61 3.5618749791650757e+87 4.9372470656494625e-201): 0
* [misc]none:  (1.4446355009900792e+23 -3.5082856951249954e-122 9.917487178181935e-54): 0
* [misc]none:  (-7.01049497494046e-138 3.841494064694043e+276 3.642806409692576e+70): 0
* [misc]none:  (-3.326243684234595e+241 -7.587678445119084e+247 1.518078533135906e+61): 0
* [misc]none:  (1.5052438492777668e+214 1.5460201380138582e-108 6.354924490516637e-174): 0
* [misc]none:  (1.1935837539207151e+36 -1.6901036379481523e+68 5.558607723763576e+296): 0
* [misc]none:  (-5129.844514220037 -8.518839978003416e+199 5.0618502549145104e+216): 0
* [misc]none:  (-2.0899529309308688e-173 -1.3078423091955545e+95 8.726419779901594e-156): 0
* [misc]none:  (1.5484790382727637e+258 2.2758369496030736e+44 2.7646272679971947e+138): 0
* [misc]none:  (1.8029164814151534e-305 -8.140052952226443e-29 -3.868827374468717e+273): 0
* [misc]none:  (-9.30868828487235e-242 7.865810923274834e+251 -1.977339157633397e-22): 0
* [misc]none:  (-12396.634829186376 2.0737883409435182e-60 8.938208620266642e-81): 0
* [misc]none:  (-1.0125994980022202e+121 9.949795070357293e-13 3.9753155304068916e+192): 0
* [misc]none:  (-1.5751944823937151e-208 -5.711690539427335e-292 2.0698086438592394e+99): 0
* [misc]none:  (8.149794087375897e+77 1.4399038101240658e-157 -0.0033935472374883513): 0
* [misc]none:  (-1.873060887288803e+204 6.486236446634097e-143 -6.777569686362558e+23): 0
* [misc]none:  (-3.976258322985434e+241 1.0713666056080785e-84 -1.4481584190101499e-109): 0
* [misc]none:  (1.8890847145741933e+54 5.334416108525731e+103 8.243928876632343e+120): 0
* [misc]none:  (4.915746009665795e+153 -1.2716911445748643e-294 -1.178199525484178e+291): 0
* [misc]none:  (-2.616452914461827e+123 -1.3552545859518693e-149 1.0769411808120101e+237): 0
* [misc]none:  (2.7212207505395135e+138 -1.7192030807828345e+260 -3.070590530502344e+254): 0
* [misc]none:  (4.3361011341035273e+108 -7.078347720981057e+296 -1.1633032638785635e+290): 0
* [misc]none:  (-2.3832835734274537e-77 -2.0550237535049573e-58 3.3652051120813564e-167): 0
* [misc]none:  (-1.6071108269264857e+240 2.2507296241296892e-278 -8.625502649886978e-116): 0
* [misc]none:  (-7.605291673043568e+86 1.3555181915244097e+58 5.535572593369702e+234): 0
* [misc]none:  (1.1281253812481777e-05 -7.875416682732296e+153 2.953059473116585e-77): 0
* [misc]none:  (-1.7943678282584236e+305 -8.253144371362014e+269 1.6962188327979892e+156): 0
* [misc]none:  (-3.0357430466827192e+202 7.526837789610841e+223 -1.0160940285787676e+119): 0
* [misc]none:  (6.853656747763464e-298 1.5907488733120222e-68 -4.474252265840201e+73): 0
* [misc]none:  (1.3833425279814779e+61 -4.807303049624254e-15 1.8641906072853124e-122): 0
* [misc]none:  (-3.0274687809727364e-300 7.50358512361513e-69 1.5464847509065313e+116): 0
* [misc]none:  (-7.218711869488973e-243 -587327855578134.2 -3.1846212263600816e-18): 0
* [misc]none:  (4.242186305736945e+277 7.288958178428041e-256 5.409384226193089e+76): 0
* [misc]none:  (-2.319372457341872e-287 4.187380162585325e-193 -1.32843112383632e+222): 0
* [misc]none:  (-1.1299275128362188e+120 6.659322155044152e+223 -2.5903554766194963e+287): 0
* [misc]none:  (-7.84381588726745e-44 3.9248553939523704e-204 -2.4810437085982083e-110): 0
* [misc]none:  (2.623583837461381e+148 -4.810065069789271e-38 1.6579472731822137e+209): 0
* [misc]none:  (7.148125858281279e-128 -1.1410424941898917e-307 -7.884101440606108e+43): 0
* [misc]none:  (3.2782900783384907e+260 1.2654023023741973e+87 5.3297020297971135e-251): 0
* [misc]none:  (4.360233270161975e+69 -1.2973858626691246e+248 -1.3038350073216301e+175): 0
* [misc]none:  (6.186245288104366e-177 4.0009214940503626e-296 -3.1670246594447204e-244): 0
* [misc]none:  (-4.944977315465704e+134 3.7946864491882027e-174 7.967379897939584e-266): 0
* [misc]none:  (5.338353252944482e+295 2.475773952907049e-271 5.261531518469373e-290): 0
* [misc]none:  (2.555657911489638e+100 2.1545947154827896e+229 2.6209188754640728e+107): 0
* [misc]none:  (1.0367654190214238e+155 7.510167254913154e-75 -1.879438806525893e-17): 0
* [misc]none:  (-2.2458375637103902e-132 -9.791675790911144e+50 5.462119320563526e+16): 0
* [misc]none:  (-7.461408405072584e-11 2.819362408294866e+247 5.576422555370537e+229): 0
* [misc]none:  (-1.2634592988240547e+184 -2.046312445248254e+167 -2.5768688170454604e-166): 0
* [misc]none:  (-2.3695265370701153e-160 5.627370989949808e+102 -1.1307817728525e-192): 0
* [misc]none:  (2.729599448498006e-142 1.268161462925599e-223 1.8558602765266175e+154): 0
* [misc]none:  (8.010626774664954e-118 3.197294045188449e-213 -3.8061627632242695e+220): 0
* [misc]none:  (1.4601547257514377e-37 6.851358071879168e+277 -1.4026731237337527e+299): 0
* [misc]none:  (1.2309532522175715e-227 5.849070875002102e-168 -1.8322924530722165e+176): 0
* [misc]none:  (2.6481468427206757e-89 1.8304705420573128e+300 5.162437418074754e-216): 0
* [misc]none:  (5.884862647618943e+102 1.3917287586797797e+215 -1.9484215729108895e+208): 0
* [misc]none:  (2.7534373406057187e+274 -6.754823491493555e-24 -2.4266153803656513e-110): 0
* [misc]none:  (2.802805856656922e+299 3267744482859.4893 -2.125403821003621e+259): 0
* [misc]none:  (-5.821161027096475e-49 4.3906960513010925e-288 9.735553079850294e-195): 0
* [misc]none:  (-2.4642361000377723e+179 -223338690.5739434 2.617385806499904e-208): 0
* [misc]none:  (6.454193966659965e-12 1.2843486366644783e+218 1.6598105327534946e+245): 0
* [misc]none:  (-2.2565106546246065e+111 -8.921793657844595e+241 -1.2504926677350782e+286): 0
* [misc]none:  (2142884768423.9766 -1.0342577969053837e-127 1.1325567110922881e-222): 0
* [misc]none:  (6.352964037059704e-48 2.0675888684205106e-37 3.9955309460256863e-193): 0
* [misc]none:  (-6.802352065741283e-237 1.7860466700053246e+179 -2.1540953112813662e-178): 0
* [misc]none:  (-1.1984894069610523e-255 2.286904329311883e+176 -3.0869297245392077e+307): 0
* [misc]none:  (-7.242911167116891e-28 -3.652961257321153e+269 -1.981435962910265e-248): 0
* [misc]none:  (1.434478809327731e-162 1.7673263201240207e+200 4.1358060479750856e+163): 0
* [misc]none:  (2.77377213114978e+181 -2.5233739143143128e-166 7.0699594918945535e-177): 0
* [misc]none:  (1.5437232098269186e+160 -5.1984298768145166e+116 -1.2768311469464077e-95): 0
* [misc]none:  (-4.0802892718556596e+97 -4.502005664483894e-90 -1.3669353810280968e+130): 0
* [misc]none:  (3.5925206879521377e-169 -1.3877894503805502e+162 3.851639943546658e-220): 0
* [misc]none:  (7.262940842293714e+141 2.5169641752150834e-130 -2.4010908942747236e-247): 0
* [misc]none:  (1.5786239562667337e+192 -1.646250865837071e-08 -4.6981533625942616e-48): 0
* [misc]none:  (-1.3666403621362786e-250 1175954691713314.2 1.6505576250215693e+254): 0
* [misc]none:  (-8.454483141733306e+289 3.2999709724191907e-111 -6.317430000587058e+24): 0
* [misc]none:  (-4.671984247068368e+114 -2.9619260441588295e+211 -7.22878673519174e-279): 0
* [misc]none:  (-3.759430214395936e-120 -1.445629235880647e+140 2.1262474173228004e+275): 0
* [misc]none:  (2.0609285567281652e-241 1.9640202737101926e+158 4.0355590295024944e+30): 0
* [misc]none:  (-3.1297081963080297e-242 8.94051254019841e+73 -1.0418876601412776e+158): 0
* [misc]none:  (1.334212127520659e-194 2.3042294780211474e+199 -0.1449571473562267): 0
* [misc]none:  (-1.322393042309631e-287 331.0762921520269 2.486727752761897e+186): 0
* [misc]none:  (6.1692613790114145e-176 3.16347551928874e-213 -1.999009223927216e-112): 0
* [misc]none:  (1.6628640493696272e+86 -1.5025592441357432e-91 1.526533864556896e-136): 0
* [misc]none:  (-1.1590427293178154e-110 2.3621708607435707e+306 -2.12081898299509e-251): 0
* [misc]none:  (-4.444969967255464e-50 -7.309457855467372e+172 -5.496412463214942e+159): 0
* [misc]none:  (-1.4721600470373534e-29 3.795139234164696e-109 9.806701774277626e-103): 0
* [misc]none:  (-3.123985774571585e+305 4.3713778543032466e+80 9.77689775396416e+270): 0
* [misc]none:  (-3.9142022803361806e-187 -5.65740503188699e+260 5.701436151254667e-51): 0
* [misc]none:  (-4.0509904466518765e-37 -6.2678543781187986e-158 2.6870891996869854e+222): 0
* [misc]none:  (1.403842517343178e+239 -4.523272375047282e+19 -3.133147621079016e+299): 0
* [misc]none:  (-3.1263201082196465e-277 4.562606033317646e+142 2.1157410136365666e+27): 0
* [misc]none:  (1.7344997138936077e-42 -3.913559470208424e-83 -2.9867969528063676e+265): 0
* [misc]none:  (3.0173777232564683e+257 1.4365336082533024e-65 7.3222795686052666e+50): 0
* [misc]none:  (-9.290387573799883e-227 2.1939039916199917e-151 6.704445560737266e-185): 0
* [misc]none:  (-9.568307378321542e-67 3.826389705571192e+305 3.2252529629473372e-164): 0
* [misc]none:  (-1.7144787029551547e-76 1945731255459.47 3.4149900413992998e-118): 0
* [misc]none:  (-3.9457481405050707e-140 -3.8831186001124554e+177 3.9566905915205435e+222): 0
* [misc]none:  (-4.045276803805828e+248 2.0407374713985817e-67 6.798712177335776e+112): 0
* [misc]none:  (-1.7506244038659656e+155 -5.551664099930396e+287 1.622208144463601e-166): 0
* [misc]none:  (-8.556050344850203e+96 -7.922576985868201e-83 2.1548182655933656e-147): 0
* [misc]none:  (-1.7889344297298395e-138 8.336613082028674e+83 -5.612374503803972e+191): 0
* [misc]none:  (2.208377572236396e-264 1.625924245506842e+101 3.6974324674576528e-196): 0
* [misc]none:  (1.194352601301008e+170 -1.2990710049317618e+149 -7.565112997028972e+159): 0
* [misc]none:  (1.1658351917668372e+172 1.3349160645071676e+249 2.931040211928409e-256): 0
* [misc]none:  (-2.439121548558237e-263 7.971191617216227e+278 -5.16988167177608e+53): 0
* [misc]none:  (2.6969709464868204e+192 -3.288801652693557e-126 -1.1724467728438874e+62): 0
* [misc]none:  (2.4787821728961726e-208 -4.583226060750687e+286 4.5505475745463453e+70): 0
* [misc]none:  (-4.7627047558420924e-178 9.818158704343799e+98 1.0173157545581e-152): 0
* [misc]none:  (-5.541734639256592e-158 6.582912119010719e-154 -2.7755596952545536e+214): 0
* [misc]none:  (-6.937852684341488e-17 -3.509811603569984e-162 1.0023146616707945e-196): 0
* [misc]none:  (-1.102805383752407e+91 -1.1833316978686804e-196 -2.074828050091204e+43): 0
* [misc]none:  (-1.6730371273659853e+134 7.03833207774333e+15 -1.3239959970038969e+98): 0
* [misc]none:  (4.1286963732031184e-303 -5.2489676640999375e-37 1.37725435443438e-133): 0
* [misc]none:  (2.7744697188841963e+109 -6.937438758466827e-192 -3.3253159094181508e+99): 0
* [misc]none:  (1.3198936947099211e-96 -1.5451834902703197e-42 -1.7726057829102443e-75): 0
* [misc]none:  (2.332651968655402e-142 -1.0504139891547427e+112 1.714387790028798e+53): 0
* [misc]none:  (1.0835466360416472e+257 2.2433259629035416e-110 4.4964231441929855e-212): 0
* [misc]none:  (-1.1740030617157484e-279 -1.2604014885172566e-16 -3.533444382159577e+294): 0
* [misc]none:  (4.163796059008999e+263 9.568517745632325e+214 2.9372247799245325e+93): 0
* [misc]none:  (3.280888101399023e-178 2.4645417753990825e-46 1.1531681692158285e+126): 0
* [misc]none:  (-2.094542504845539e+96 3.658887962688304e-221 -8.114819311899108e-200): 0
* [misc]none:  (-3.106463349287814e-283 -3194.11813336966 3.8921610463731365e-84): 0
* [misc]none:  (-8.851204171241843e+281 -9.262519032529967e-34 -1.785130886221006e+231): 0
* [misc]none:  (5.244418714777191e-247 -1.1047298144911661e-128 -3.806792758567173e-77): 0
* [misc]none:  (8.483535156875368e-302 -1.345613125533753e+279 -1.8508777881935605e+151): 0
* [misc]none:  (-0.0006673038257262197 2.8621091346925045e-294 1.532108192832722e+128): 0
* [misc]none:  (-5.0502610074661083e+207 3.789685423350582e-08 -1.2565837085170136e-39): 0
* [misc]none:  (1.762534146009323e+140 -1.0334310654904308e-302 6.545384967014291e-225): 0
* [misc]none:  (9.107018310586045e+54 -2.971342031183356e+89 -1.6718446752859893e+111): 0
* [misc]none:  (4.918436108504659e-301 -2.0718283319643413e+202 -1.6194758145392415e-55): 0
* [misc]none:  (1.6691081971097037e+94 -7.498270199484197e+128 2.7394548302027227e-88): 0
* [misc]none:  (-3.8474489635359294e+91 3.118009484335783e-104 -5.8304170084179074e-46): 0
* [misc]none:  (-2.67503022703027e-297 -2.5128760687731143e+95 8995869217554.457): 0
* [misc]none:  (-1.9632140373363783e+122 1.2420866124564814e-293 6.3461851602547e-177): 0
* [misc]none:  (-3.432853067516309e-246 2.0914477614867384e-227 2.01314860958205e-179): 0
* [misc]none:  (4.1821161712206335e+98 -1.06513481701701e-107 -4.126212717690705e-129): 0
* [misc]none:  (-6.0258374336189325e+121 1.241885419647938e+111 3.5248326356674874e-60): 0
* [misc]none:  (-185563564389128.0 -3.2505753217846565e-280 -3.802991462899128e-34): 0
* [misc]none:  (2.5937923840174148e+191 2.0634010725481968e+279 -6.71288738518563e+35): 0
* [misc]none:  (-1.3468517163131261e+272 3.7544706354148685e+249 -5.537735150627702e+213): 0
* [misc]none:  (1.740072246435861e-207 1.3636559368742825e-149 1.946944651699716e-139): 0
* [misc]none:  (6.333153678225876e-68 8.70336562916574e-216 7.84549397492709e+169): 0
* [misc]none:  (6363.313367940982 -1.977991260671615e-272 7.762114448443534e+255): 0
* [misc]none:  (1.682179526351612e+60 1.3399459123824423e-08 -2.0088395627297287e+293): 0
* [misc]none:  (-2.0811417072211844e+239 -2.4464470346425223e-307 6.330170018440137e-77): 0
* [misc]none:  (6.04623429007003e-242 -4.345326241698038e-278 5.823432666941199e+232): 0
* [misc]none:  (-3.1969871529936574e+166 3.226368417375545e+273 3.982342803919231e-46): 0
* [misc]none:  (-1.1442254260677068e-38 -1.1682833194119885e+290 1.7119636201650242e-68): 0
* [misc]none:  (5.22304174043592e-158 -3.807000870050907e+58 -1.6925574577510237e+214): 0
* [misc]none:  (8.377477023109926e-106 2.3080855823624493e-299 4.50326449267665e+246): 0
* [misc]none:  (1.0100264902476595e-152 6.2370208452565505e-251 -1.3788511600691207e+143): 0
* [misc]none:  (-9.563665845262864e+134 -4.34857343156037e+281 6.2285928439400495e+156): 0
* [misc]none:  (0.002518103001908201 2.819308104709626e+146 -4.0300440872978227e-184): 0
* [misc]none:  (1.4105181521169557e+85 -2.665217209595492e+188 3.5241094689699846e+143): 0
* [misc]none:  (4.19388438569828e-183 3.636662419716013e-100 -1.2948317804463169e-282): 0
* [misc]none:  (-2.8090151520671207e+163 2.984404923140836e-249 5.437516292888218e-268): 0
* [misc]none:  (5.520248382898629e-230 6.71342285975285e-63 -3.464947738442053e-155): 0
* [misc]none:  (4.004060788521414e+101 5.679811834757315e+283 -6.473810795939257e+164): 0
* [misc]none:  (3.588388254213374e-229 -1139547812.809111 4.890275917515567e-08): 0
* [misc]none:  (-5.005096670380054e+47 -1.1716631781329626e-278 2.3982589341782892e+126): 0
* [misc]none:  (-3.4998489762015864e-219 1.2430204782976187e-178 -1.9903644617661157e-253): 0
* [misc]none:  (-2.385315376938663e+253 1.6672558556111832e-132 -5.52786254698352e+123): 0
* [misc]none:  (-3.3129658515159495e+106 -2.2098708111796672e-198 -2.404284016476968e+279): 0
* [misc]none:  (1.233722688499856e-260 -3.5028343458937535e-90 5.227910927587319e+245): 0
* [misc]none:  (-63767.21419834566 -1.7606249358192524e+273 267950632.53292695): 0
* [misc]none:  (5.624641690736252e-214 8.322805913504859e+214 3.2616756987284277e-94): 0
* [misc]none:  (5.772678079688886e-193 -6.744341629118722e+132 6.954230926244437e-248): 0
* [misc]none:  (-8.888663579267588e+145 -1.2824561231119317e-43 -5.084319674250709e+292): 0
* [misc]none:  (1.2017614084255727e-118 2.163051204570009e+135 -9.483463323409894e+83): 0
* [misc]none:  (1.3207468552144425e-275 1.2439278636891217e+233 1.1524614864139226e-160): 0
* [misc]none:  (1.5181493189729785e-210 2.5055367778394023e+168 161620833577619.34): 0
* [misc]none:  (2.9543484210487e+68 -4.0220565746330086e+125 -1.6011896215578737e-278): 0
* [misc]none:  (-8.84696133260257e-277 1.0241174400059815e-119 -1.279384825639919e+218): 0
* [misc]none:  (-4.0734910927239613e+279 -2.2941123619407014e-42 -1.5101815541228603e-252): 0
* [misc]none:  (4.849304008883996e+136 -1.9158965524986357e+21 -1.0078494497283481e-63): 0
* [misc]none:  (-4.666260546447364e-94 7.089677021982108e+243 5.396180940081133e+274): 0
* [misc]none:  (-1.0374694539724338e-22 3.1474503815022313e+156 2.237363577109642e+74): 0
* [misc]none:  (1.6588937679962464e-112 3.192528639732453e+177 -5.90661572185385e+255): 0
* [misc]none:  (1.1908969294818754e-266 3.099784283699168e-174 -4.3665826438370466e+132): 0
* [misc]none:  (-1.0295936791749538e-299 -2.3878879079615316e+176 -2.7604299366199517e-300): 0
* [misc]none:  (-7.185580883046913e-107 -9.568148082725508e-90 -1.9577524593014605e+255): 0
* [misc]none:  (2.4666697643039057e+135 -9.953058197226308e-231 -1.6523309537219388e+292): 0
* [misc]none:  (1.4077992202573094e+157 -1.6969785717566782e-186 1.2222350343583978e+196): 0
* [misc]none:  (-1.4775843798497103e-226 1.13308848626096e-94 -1.0922245877481088e-202): 0
* [misc]none:  (4.042918419768235e-293 -3.2304680091420593e+273 -1.5418757249344543e-63): 0
* [misc]none:  (-1.5808149525401404e+250 3.027496459540811e+165 -1.2288638190895444e-91): 0
* [misc]none:  (-2.2214116445848722e-125 7.06806421332372e-195 -1.6177284163081556e-296): 0
* [misc]none:  (1.3558740031834803e-64 -9.115550998149062e+67 -4.7657636456813475e+188): 0
* [misc]none:  (6.054739181733751e+60 -3.7471130771905855e-70 -1.652280336936078e-182): 0
* [misc]none:  (-5.086606424901955e-26 -4.150888523033341e+56 2.5369593669384417e-158): 0
* [misc]none:  (4.1567543090652754e-33 -7.628468316635274e+118 -2.1412051815551306e+98): 0
* [misc]none:  (-7.67790351718318e-207 -1.1396663342585698e+185 -1.4047943834222912e+32): 0
* [misc]none:  (1.0167208681953543e+192 1.5933622570633916e-225 -8.205466933650709e-224): 0
* [misc]none:  (1.23513259853389e-199 -2.455637018443649e+26 -5.138936398971843e-75): 0
* [misc]none:  (4.3707194781987494e-97 -2.547315038123042e-87 3.4204094411255474e+115): 0
* [misc]none:  (31.114677989939693 2.800912164521124e-20 -3.2777951328230936e-29): 0
* [misc]none:  (-5.5773404803592965e+259 3.7931337372770976e-299 2.786772086490314e-60): 0
* [misc]none:  (-5.616681094429007e+40 3.096144630304459e-05 -3.1136499993102923e-28): 0
* [misc]none:  (2.1273566438007147e+264 2.075848018336343e+269 -1.6092812022702055e+27): 0
* [misc]none:  (-4.049616931519095e-12 5.231369250464457e+247 -8.701752776315519e+299): 0
* [misc]none:  (1.341667886706771e+115 3.8005266578165216e-258 -1.0098619973673771e+143): 0
* [misc]none:  (2.57846868660545e+128 1.8293764358985593e+179 -3.4049300239591715e+140): 0
* [misc]none:  (-3.2101962723934187e-96 7.417468591127432e+67 -3.877298803162118e-30): 0
* [misc]none:  (-1.8198742460941646e-81 -2.0820068164655182e+40 -7.236742688934569e+286): 0
* [misc]none:  (-8.323040591341415e+218 -4.677922974670643e+80 -6.692473243860769e+126): 0
* [misc]none:  (-1.9106041457506788e-63 3.747520792911468e+127 5.430483387973432e+258): 0
* [misc]none:  (2.2335992870926316e-153 1.4503417141831182e+51 2.0547294018965633e+61): 0
* [misc]none:  (7.852155885222424e-118 -2.8375357663701133e-215 6.513244922065764e-226): 0
* [misc]none:  (7.385144370900328e+173 -5.542636511154422e+167 7.908117764318118e+264): 0
* [misc]none:  (-2.441280553156046e-191 -8.5828334236211e+37 -1.0997158053453796e+52): 0
* [misc]none:  (6.819956828556854e+177 -3.987835231847739e-28 -1.3157971823804226e+26): 0
* [misc]none:  (3.2159945588434616e-06 5.306065123039819 -7.710049967444384e+140): 0
* [misc]none:  (9.03697438609635e-254 5.834916983599053e-288 -3.248874545341504e+57): 0
* [misc]none:  (-4.693794485448123e+266 -1.0182917238227828e-268 7.874050663202412e-138): 0
* [misc]none:  (-2.9961253346398193e-277 -4.2324566784967944e-196 -6.824787913341571e-74): 0
* [misc]none:  (8.573472507341022e+41 -3.1598975960421508e+277 -3.3169741611569367e+305): 0
* [misc]none:  (1.4410801258605738e+62 106537.6777769988 -2.6159166493367154e-235): 0
* [misc]none:  (-2.576894021693856e-173 -4.230280825094585e+83 8.062228390339164e-110): 0
* [misc]none:  (-1.8358840832683498e+44 -2.156801537654526e+36 -3.512703779155646e-87): 0
* [misc]none:  (-6.846939373244303e+227 2.125743593675342e+150 -3.1982664100230636e+83): 0
* [misc]none:  (-6.253340869605864e+291 1.4031893252788157e-130 -2.4878548514423325e+131): 0
* [misc]none:  (4.547656836966103e-26 -9.296466940750938e-169 2.3403140268290895e-220): 0
* [misc]none:  (-5.094827374807951e+22 -3.0047845617322243e+245 3.456521015844278e-267): 0
* [misc]none:  (5.548340076310199e-111 -5.686069957565031e-220 -4.479806301623672e-178): 0
* [misc]none:  (-2.3266982566628708e-73 -4.924557161248151e-49 2.0491433117473444e+251): 0
* [misc]none:  (2.1868710093441635e-94 -2.9110234445746466e+124 4.292734438749543e-07): 0
* [misc]none:  (-1.3160349663332311e-291 -1.0651455859079758e-283 4.626894916535224e-128): 0
* [misc]none:  (1.114170127871121e+259 8.453366577306196e-160 -8.935111048608571e-173): 0
* [misc]none:  (-5.548866558621532e-09 0.0019265340891290363 2.5107596839002617e-188): 0
* [misc]none:  (-2715439348210.3716 3.8364962842018573e-131 -8.310532646005735e-88): 0
* [misc]none:  (9.373070312843732e-91 -1.3476877676941842e+188 -1.1445296297917484e+276): 0
* [misc]none:  (-2.854465274914285e+95 1.5238038259281467e+97 -2.9771655786075137e-170): 0
* [misc]none:  (1.011727234239232e-268 5.76823955439101e-249 -2.0681820259142047e+203): 0
* [misc]none:  (-5.358736018951544e-210 -3.780049011953038e-263 -7.356146101163064e-142): 0
* [misc]none:  (-4.679560768974975e-224 -1.7581458633759795e+76 -2.615425031816684e-28): 0
* [misc]none:  (9.00969948519257e+300 -4.472004514616723e-118 2.4547241600019345e+232): 0
* [misc]none:  (7.022076711242115e-133 -7.904392031638281e+133 -5.94028418794007e+211): 0
* [misc]none:  (-9.328298623753299e+123 -1.0504234320141073e+133 2.943249346534323e+144): 0
* [misc]none:  (-5.6215764598070664e+281 7.885146171822741e-252 4.254787401710164e+249): 0
* [misc]none:  (1.376461838305041e-44 1.1351952620028756e+104 4.887341950722903e-119): 0
* [misc]none:  All alt indexes
* [misc]none:  (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))): 0
* [misc]none:  Best alt per point
* [misc]none:  (1.8269212298308998e+214 1789977963981.046 -1.7899154283931006e-62): 0
* [misc]none:  (1.6281717766697912e+39 3.5243641367880456e+86 -3.0008256032154172e-176): 0
* [misc]none:  (-7.986330642950897e-117 1.1611754700502491e-55 8.728226238434233e-64): 0
* [misc]none:  (-1.6133455999823373e+110 -3.9890484917100117e+257 -1.5117832743647305e-21): 0
* [misc]none:  (3.928924306566786e-70 5.222760300460367e-180 -4.026134204708055e+160): 0
* [misc]none:  (2.281413649637054e-166 4.156243175149629e-181 -9.231874857928986e-255): 0
* [misc]none:  (-1.65054043818576e-39 -1.0058709145515093e+290 -4.753699147196455e-118): 0
* [misc]none:  (-4.805584106456354e-282 -0.15058815983267834 3.714800492587865e+85): 0
* [misc]none:  (-4.7089063680709754e+260 4.344802098601123e-298 4.508329239962989e+257): 0
* [misc]none:  (-1.211264682641895e-292 1.0495684746531957e+167 2.721003254105153e-81): 0
* [misc]none:  (-3.0671153252781823e-63 -7.74362334743424e+32 -2.2376851712564295e-118): 0
* [misc]none:  (1.64239269831532e+149 -1.576948173228613e+33 9.680698928511806e-32): 0
* [misc]none:  (1.954959341132994e-252 -7.83347153590065e-06 5.521334390623478e-06): 0
* [misc]none:  (-3.229654932887624e+201 -9.827696191097834e-18 -1.3343140776153144e-304): 0
* [misc]none:  (-9.906575581428813e+195 7.10957194421701e+200 -4.7756557550151386e+160): 0
* [misc]none:  (2.4256946179069016e+78 6.207394963032113e+30 -7.218692088264328e+54): 0
* [misc]none:  (8.781920275794267e+61 3.5618749791650757e+87 4.9372470656494625e-201): 0
* [misc]none:  (1.4446355009900792e+23 -3.5082856951249954e-122 9.917487178181935e-54): 0
* [misc]none:  (-7.01049497494046e-138 3.841494064694043e+276 3.642806409692576e+70): 0
* [misc]none:  (-3.326243684234595e+241 -7.587678445119084e+247 1.518078533135906e+61): 0
* [misc]none:  (1.5052438492777668e+214 1.5460201380138582e-108 6.354924490516637e-174): 0
* [misc]none:  (1.1935837539207151e+36 -1.6901036379481523e+68 5.558607723763576e+296): 0
* [misc]none:  (-5129.844514220037 -8.518839978003416e+199 5.0618502549145104e+216): 0
* [misc]none:  (-2.0899529309308688e-173 -1.3078423091955545e+95 8.726419779901594e-156): 0
* [misc]none:  (1.5484790382727637e+258 2.2758369496030736e+44 2.7646272679971947e+138): 0
* [misc]none:  (1.8029164814151534e-305 -8.140052952226443e-29 -3.868827374468717e+273): 0
* [misc]none:  (-9.30868828487235e-242 7.865810923274834e+251 -1.977339157633397e-22): 0
* [misc]none:  (-12396.634829186376 2.0737883409435182e-60 8.938208620266642e-81): 0
* [misc]none:  (-1.0125994980022202e+121 9.949795070357293e-13 3.9753155304068916e+192): 0
* [misc]none:  (-1.5751944823937151e-208 -5.711690539427335e-292 2.0698086438592394e+99): 0
* [misc]none:  (8.149794087375897e+77 1.4399038101240658e-157 -0.0033935472374883513): 0
* [misc]none:  (-1.873060887288803e+204 6.486236446634097e-143 -6.777569686362558e+23): 0
* [misc]none:  (-3.976258322985434e+241 1.0713666056080785e-84 -1.4481584190101499e-109): 0
* [misc]none:  (1.8890847145741933e+54 5.334416108525731e+103 8.243928876632343e+120): 0
* [misc]none:  (4.915746009665795e+153 -1.2716911445748643e-294 -1.178199525484178e+291): 0
* [misc]none:  (-2.616452914461827e+123 -1.3552545859518693e-149 1.0769411808120101e+237): 0
* [misc]none:  (2.7212207505395135e+138 -1.7192030807828345e+260 -3.070590530502344e+254): 0
* [misc]none:  (4.3361011341035273e+108 -7.078347720981057e+296 -1.1633032638785635e+290): 0
* [misc]none:  (-2.3832835734274537e-77 -2.0550237535049573e-58 3.3652051120813564e-167): 0
* [misc]none:  (-1.6071108269264857e+240 2.2507296241296892e-278 -8.625502649886978e-116): 0
* [misc]none:  (-7.605291673043568e+86 1.3555181915244097e+58 5.535572593369702e+234): 0
* [misc]none:  (1.1281253812481777e-05 -7.875416682732296e+153 2.953059473116585e-77): 0
* [misc]none:  (-1.7943678282584236e+305 -8.253144371362014e+269 1.6962188327979892e+156): 0
* [misc]none:  (-3.0357430466827192e+202 7.526837789610841e+223 -1.0160940285787676e+119): 0
* [misc]none:  (6.853656747763464e-298 1.5907488733120222e-68 -4.474252265840201e+73): 0
* [misc]none:  (1.3833425279814779e+61 -4.807303049624254e-15 1.8641906072853124e-122): 0
* [misc]none:  (-3.0274687809727364e-300 7.50358512361513e-69 1.5464847509065313e+116): 0
* [misc]none:  (-7.218711869488973e-243 -587327855578134.2 -3.1846212263600816e-18): 0
* [misc]none:  (4.242186305736945e+277 7.288958178428041e-256 5.409384226193089e+76): 0
* [misc]none:  (-2.319372457341872e-287 4.187380162585325e-193 -1.32843112383632e+222): 0
* [misc]none:  (-1.1299275128362188e+120 6.659322155044152e+223 -2.5903554766194963e+287): 0
* [misc]none:  (-7.84381588726745e-44 3.9248553939523704e-204 -2.4810437085982083e-110): 0
* [misc]none:  (2.623583837461381e+148 -4.810065069789271e-38 1.6579472731822137e+209): 0
* [misc]none:  (7.148125858281279e-128 -1.1410424941898917e-307 -7.884101440606108e+43): 0
* [misc]none:  (3.2782900783384907e+260 1.2654023023741973e+87 5.3297020297971135e-251): 0
* [misc]none:  (4.360233270161975e+69 -1.2973858626691246e+248 -1.3038350073216301e+175): 0
* [misc]none:  (6.186245288104366e-177 4.0009214940503626e-296 -3.1670246594447204e-244): 0
* [misc]none:  (-4.944977315465704e+134 3.7946864491882027e-174 7.967379897939584e-266): 0
* [misc]none:  (5.338353252944482e+295 2.475773952907049e-271 5.261531518469373e-290): 0
* [misc]none:  (2.555657911489638e+100 2.1545947154827896e+229 2.6209188754640728e+107): 0
* [misc]none:  (1.0367654190214238e+155 7.510167254913154e-75 -1.879438806525893e-17): 0
* [misc]none:  (-2.2458375637103902e-132 -9.791675790911144e+50 5.462119320563526e+16): 0
* [misc]none:  (-7.461408405072584e-11 2.819362408294866e+247 5.576422555370537e+229): 0
* [misc]none:  (-1.2634592988240547e+184 -2.046312445248254e+167 -2.5768688170454604e-166): 0
* [misc]none:  (-2.3695265370701153e-160 5.627370989949808e+102 -1.1307817728525e-192): 0
* [misc]none:  (2.729599448498006e-142 1.268161462925599e-223 1.8558602765266175e+154): 0
* [misc]none:  (8.010626774664954e-118 3.197294045188449e-213 -3.8061627632242695e+220): 0
* [misc]none:  (1.4601547257514377e-37 6.851358071879168e+277 -1.4026731237337527e+299): 0
* [misc]none:  (1.2309532522175715e-227 5.849070875002102e-168 -1.8322924530722165e+176): 0
* [misc]none:  (2.6481468427206757e-89 1.8304705420573128e+300 5.162437418074754e-216): 0
* [misc]none:  (5.884862647618943e+102 1.3917287586797797e+215 -1.9484215729108895e+208): 0
* [misc]none:  (2.7534373406057187e+274 -6.754823491493555e-24 -2.4266153803656513e-110): 0
* [misc]none:  (2.802805856656922e+299 3267744482859.4893 -2.125403821003621e+259): 0
* [misc]none:  (-5.821161027096475e-49 4.3906960513010925e-288 9.735553079850294e-195): 0
* [misc]none:  (-2.4642361000377723e+179 -223338690.5739434 2.617385806499904e-208): 0
* [misc]none:  (6.454193966659965e-12 1.2843486366644783e+218 1.6598105327534946e+245): 0
* [misc]none:  (-2.2565106546246065e+111 -8.921793657844595e+241 -1.2504926677350782e+286): 0
* [misc]none:  (2142884768423.9766 -1.0342577969053837e-127 1.1325567110922881e-222): 0
* [misc]none:  (6.352964037059704e-48 2.0675888684205106e-37 3.9955309460256863e-193): 0
* [misc]none:  (-6.802352065741283e-237 1.7860466700053246e+179 -2.1540953112813662e-178): 0
* [misc]none:  (-1.1984894069610523e-255 2.286904329311883e+176 -3.0869297245392077e+307): 0
* [misc]none:  (-7.242911167116891e-28 -3.652961257321153e+269 -1.981435962910265e-248): 0
* [misc]none:  (1.434478809327731e-162 1.7673263201240207e+200 4.1358060479750856e+163): 0
* [misc]none:  (2.77377213114978e+181 -2.5233739143143128e-166 7.0699594918945535e-177): 0
* [misc]none:  (1.5437232098269186e+160 -5.1984298768145166e+116 -1.2768311469464077e-95): 0
* [misc]none:  (-4.0802892718556596e+97 -4.502005664483894e-90 -1.3669353810280968e+130): 0
* [misc]none:  (3.5925206879521377e-169 -1.3877894503805502e+162 3.851639943546658e-220): 0
* [misc]none:  (7.262940842293714e+141 2.5169641752150834e-130 -2.4010908942747236e-247): 0
* [misc]none:  (1.5786239562667337e+192 -1.646250865837071e-08 -4.6981533625942616e-48): 0
* [misc]none:  (-1.3666403621362786e-250 1175954691713314.2 1.6505576250215693e+254): 0
* [misc]none:  (-8.454483141733306e+289 3.2999709724191907e-111 -6.317430000587058e+24): 0
* [misc]none:  (-4.671984247068368e+114 -2.9619260441588295e+211 -7.22878673519174e-279): 0
* [misc]none:  (-3.759430214395936e-120 -1.445629235880647e+140 2.1262474173228004e+275): 0
* [misc]none:  (2.0609285567281652e-241 1.9640202737101926e+158 4.0355590295024944e+30): 0
* [misc]none:  (-3.1297081963080297e-242 8.94051254019841e+73 -1.0418876601412776e+158): 0
* [misc]none:  (1.334212127520659e-194 2.3042294780211474e+199 -0.1449571473562267): 0
* [misc]none:  (-1.322393042309631e-287 331.0762921520269 2.486727752761897e+186): 0
* [misc]none:  (6.1692613790114145e-176 3.16347551928874e-213 -1.999009223927216e-112): 0
* [misc]none:  (1.6628640493696272e+86 -1.5025592441357432e-91 1.526533864556896e-136): 0
* [misc]none:  (-1.1590427293178154e-110 2.3621708607435707e+306 -2.12081898299509e-251): 0
* [misc]none:  (-4.444969967255464e-50 -7.309457855467372e+172 -5.496412463214942e+159): 0
* [misc]none:  (-1.4721600470373534e-29 3.795139234164696e-109 9.806701774277626e-103): 0
* [misc]none:  (-3.123985774571585e+305 4.3713778543032466e+80 9.77689775396416e+270): 0
* [misc]none:  (-3.9142022803361806e-187 -5.65740503188699e+260 5.701436151254667e-51): 0
* [misc]none:  (-4.0509904466518765e-37 -6.2678543781187986e-158 2.6870891996869854e+222): 0
* [misc]none:  (1.403842517343178e+239 -4.523272375047282e+19 -3.133147621079016e+299): 0
* [misc]none:  (-3.1263201082196465e-277 4.562606033317646e+142 2.1157410136365666e+27): 0
* [misc]none:  (1.7344997138936077e-42 -3.913559470208424e-83 -2.9867969528063676e+265): 0
* [misc]none:  (3.0173777232564683e+257 1.4365336082533024e-65 7.3222795686052666e+50): 0
* [misc]none:  (-9.290387573799883e-227 2.1939039916199917e-151 6.704445560737266e-185): 0
* [misc]none:  (-9.568307378321542e-67 3.826389705571192e+305 3.2252529629473372e-164): 0
* [misc]none:  (-1.7144787029551547e-76 1945731255459.47 3.4149900413992998e-118): 0
* [misc]none:  (-3.9457481405050707e-140 -3.8831186001124554e+177 3.9566905915205435e+222): 0
* [misc]none:  (-4.045276803805828e+248 2.0407374713985817e-67 6.798712177335776e+112): 0
* [misc]none:  (-1.7506244038659656e+155 -5.551664099930396e+287 1.622208144463601e-166): 0
* [misc]none:  (-8.556050344850203e+96 -7.922576985868201e-83 2.1548182655933656e-147): 0
* [misc]none:  (-1.7889344297298395e-138 8.336613082028674e+83 -5.612374503803972e+191): 0
* [misc]none:  (2.208377572236396e-264 1.625924245506842e+101 3.6974324674576528e-196): 0
* [misc]none:  (1.194352601301008e+170 -1.2990710049317618e+149 -7.565112997028972e+159): 0
* [misc]none:  (1.1658351917668372e+172 1.3349160645071676e+249 2.931040211928409e-256): 0
* [misc]none:  (-2.439121548558237e-263 7.971191617216227e+278 -5.16988167177608e+53): 0
* [misc]none:  (2.6969709464868204e+192 -3.288801652693557e-126 -1.1724467728438874e+62): 0
* [misc]none:  (2.4787821728961726e-208 -4.583226060750687e+286 4.5505475745463453e+70): 0
* [misc]none:  (-4.7627047558420924e-178 9.818158704343799e+98 1.0173157545581e-152): 0
* [misc]none:  (-5.541734639256592e-158 6.582912119010719e-154 -2.7755596952545536e+214): 0
* [misc]none:  (-6.937852684341488e-17 -3.509811603569984e-162 1.0023146616707945e-196): 0
* [misc]none:  (-1.102805383752407e+91 -1.1833316978686804e-196 -2.074828050091204e+43): 0
* [misc]none:  (-1.6730371273659853e+134 7.03833207774333e+15 -1.3239959970038969e+98): 0
* [misc]none:  (4.1286963732031184e-303 -5.2489676640999375e-37 1.37725435443438e-133): 0
* [misc]none:  (2.7744697188841963e+109 -6.937438758466827e-192 -3.3253159094181508e+99): 0
* [misc]none:  (1.3198936947099211e-96 -1.5451834902703197e-42 -1.7726057829102443e-75): 0
* [misc]none:  (2.332651968655402e-142 -1.0504139891547427e+112 1.714387790028798e+53): 0
* [misc]none:  (1.0835466360416472e+257 2.2433259629035416e-110 4.4964231441929855e-212): 0
* [misc]none:  (-1.1740030617157484e-279 -1.2604014885172566e-16 -3.533444382159577e+294): 0
* [misc]none:  (4.163796059008999e+263 9.568517745632325e+214 2.9372247799245325e+93): 0
* [misc]none:  (3.280888101399023e-178 2.4645417753990825e-46 1.1531681692158285e+126): 0
* [misc]none:  (-2.094542504845539e+96 3.658887962688304e-221 -8.114819311899108e-200): 0
* [misc]none:  (-3.106463349287814e-283 -3194.11813336966 3.8921610463731365e-84): 0
* [misc]none:  (-8.851204171241843e+281 -9.262519032529967e-34 -1.785130886221006e+231): 0
* [misc]none:  (5.244418714777191e-247 -1.1047298144911661e-128 -3.806792758567173e-77): 0
* [misc]none:  (8.483535156875368e-302 -1.345613125533753e+279 -1.8508777881935605e+151): 0
* [misc]none:  (-0.0006673038257262197 2.8621091346925045e-294 1.532108192832722e+128): 0
* [misc]none:  (-5.0502610074661083e+207 3.789685423350582e-08 -1.2565837085170136e-39): 0
* [misc]none:  (1.762534146009323e+140 -1.0334310654904308e-302 6.545384967014291e-225): 0
* [misc]none:  (9.107018310586045e+54 -2.971342031183356e+89 -1.6718446752859893e+111): 0
* [misc]none:  (4.918436108504659e-301 -2.0718283319643413e+202 -1.6194758145392415e-55): 0
* [misc]none:  (1.6691081971097037e+94 -7.498270199484197e+128 2.7394548302027227e-88): 0
* [misc]none:  (-3.8474489635359294e+91 3.118009484335783e-104 -5.8304170084179074e-46): 0
* [misc]none:  (-2.67503022703027e-297 -2.5128760687731143e+95 8995869217554.457): 0
* [misc]none:  (-1.9632140373363783e+122 1.2420866124564814e-293 6.3461851602547e-177): 0
* [misc]none:  (-3.432853067516309e-246 2.0914477614867384e-227 2.01314860958205e-179): 0
* [misc]none:  (4.1821161712206335e+98 -1.06513481701701e-107 -4.126212717690705e-129): 0
* [misc]none:  (-6.0258374336189325e+121 1.241885419647938e+111 3.5248326356674874e-60): 0
* [misc]none:  (-185563564389128.0 -3.2505753217846565e-280 -3.802991462899128e-34): 0
* [misc]none:  (2.5937923840174148e+191 2.0634010725481968e+279 -6.71288738518563e+35): 0
* [misc]none:  (-1.3468517163131261e+272 3.7544706354148685e+249 -5.537735150627702e+213): 0
* [misc]none:  (1.740072246435861e-207 1.3636559368742825e-149 1.946944651699716e-139): 0
* [misc]none:  (6.333153678225876e-68 8.70336562916574e-216 7.84549397492709e+169): 0
* [misc]none:  (6363.313367940982 -1.977991260671615e-272 7.762114448443534e+255): 0
* [misc]none:  (1.682179526351612e+60 1.3399459123824423e-08 -2.0088395627297287e+293): 0
* [misc]none:  (-2.0811417072211844e+239 -2.4464470346425223e-307 6.330170018440137e-77): 0
* [misc]none:  (6.04623429007003e-242 -4.345326241698038e-278 5.823432666941199e+232): 0
* [misc]none:  (-3.1969871529936574e+166 3.226368417375545e+273 3.982342803919231e-46): 0
* [misc]none:  (-1.1442254260677068e-38 -1.1682833194119885e+290 1.7119636201650242e-68): 0
* [misc]none:  (5.22304174043592e-158 -3.807000870050907e+58 -1.6925574577510237e+214): 0
* [misc]none:  (8.377477023109926e-106 2.3080855823624493e-299 4.50326449267665e+246): 0
* [misc]none:  (1.0100264902476595e-152 6.2370208452565505e-251 -1.3788511600691207e+143): 0
* [misc]none:  (-9.563665845262864e+134 -4.34857343156037e+281 6.2285928439400495e+156): 0
* [misc]none:  (0.002518103001908201 2.819308104709626e+146 -4.0300440872978227e-184): 0
* [misc]none:  (1.4105181521169557e+85 -2.665217209595492e+188 3.5241094689699846e+143): 0
* [misc]none:  (4.19388438569828e-183 3.636662419716013e-100 -1.2948317804463169e-282): 0
* [misc]none:  (-2.8090151520671207e+163 2.984404923140836e-249 5.437516292888218e-268): 0
* [misc]none:  (5.520248382898629e-230 6.71342285975285e-63 -3.464947738442053e-155): 0
* [misc]none:  (4.004060788521414e+101 5.679811834757315e+283 -6.473810795939257e+164): 0
* [misc]none:  (3.588388254213374e-229 -1139547812.809111 4.890275917515567e-08): 0
* [misc]none:  (-5.005096670380054e+47 -1.1716631781329626e-278 2.3982589341782892e+126): 0
* [misc]none:  (-3.4998489762015864e-219 1.2430204782976187e-178 -1.9903644617661157e-253): 0
* [misc]none:  (-2.385315376938663e+253 1.6672558556111832e-132 -5.52786254698352e+123): 0
* [misc]none:  (-3.3129658515159495e+106 -2.2098708111796672e-198 -2.404284016476968e+279): 0
* [misc]none:  (1.233722688499856e-260 -3.5028343458937535e-90 5.227910927587319e+245): 0
* [misc]none:  (-63767.21419834566 -1.7606249358192524e+273 267950632.53292695): 0
* [misc]none:  (5.624641690736252e-214 8.322805913504859e+214 3.2616756987284277e-94): 0
* [misc]none:  (5.772678079688886e-193 -6.744341629118722e+132 6.954230926244437e-248): 0
* [misc]none:  (-8.888663579267588e+145 -1.2824561231119317e-43 -5.084319674250709e+292): 0
* [misc]none:  (1.2017614084255727e-118 2.163051204570009e+135 -9.483463323409894e+83): 0
* [misc]none:  (1.3207468552144425e-275 1.2439278636891217e+233 1.1524614864139226e-160): 0
* [misc]none:  (1.5181493189729785e-210 2.5055367778394023e+168 161620833577619.34): 0
* [misc]none:  (2.9543484210487e+68 -4.0220565746330086e+125 -1.6011896215578737e-278): 0
* [misc]none:  (-8.84696133260257e-277 1.0241174400059815e-119 -1.279384825639919e+218): 0
* [misc]none:  (-4.0734910927239613e+279 -2.2941123619407014e-42 -1.5101815541228603e-252): 0
* [misc]none:  (4.849304008883996e+136 -1.9158965524986357e+21 -1.0078494497283481e-63): 0
* [misc]none:  (-4.666260546447364e-94 7.089677021982108e+243 5.396180940081133e+274): 0
* [misc]none:  (-1.0374694539724338e-22 3.1474503815022313e+156 2.237363577109642e+74): 0
* [misc]none:  (1.6588937679962464e-112 3.192528639732453e+177 -5.90661572185385e+255): 0
* [misc]none:  (1.1908969294818754e-266 3.099784283699168e-174 -4.3665826438370466e+132): 0
* [misc]none:  (-1.0295936791749538e-299 -2.3878879079615316e+176 -2.7604299366199517e-300): 0
* [misc]none:  (-7.185580883046913e-107 -9.568148082725508e-90 -1.9577524593014605e+255): 0
* [misc]none:  (2.4666697643039057e+135 -9.953058197226308e-231 -1.6523309537219388e+292): 0
* [misc]none:  (1.4077992202573094e+157 -1.6969785717566782e-186 1.2222350343583978e+196): 0
* [misc]none:  (-1.4775843798497103e-226 1.13308848626096e-94 -1.0922245877481088e-202): 0
* [misc]none:  (4.042918419768235e-293 -3.2304680091420593e+273 -1.5418757249344543e-63): 0
* [misc]none:  (-1.5808149525401404e+250 3.027496459540811e+165 -1.2288638190895444e-91): 0
* [misc]none:  (-2.2214116445848722e-125 7.06806421332372e-195 -1.6177284163081556e-296): 0
* [misc]none:  (1.3558740031834803e-64 -9.115550998149062e+67 -4.7657636456813475e+188): 0
* [misc]none:  (6.054739181733751e+60 -3.7471130771905855e-70 -1.652280336936078e-182): 0
* [misc]none:  (-5.086606424901955e-26 -4.150888523033341e+56 2.5369593669384417e-158): 0
* [misc]none:  (4.1567543090652754e-33 -7.628468316635274e+118 -2.1412051815551306e+98): 0
* [misc]none:  (-7.67790351718318e-207 -1.1396663342585698e+185 -1.4047943834222912e+32): 0
* [misc]none:  (1.0167208681953543e+192 1.5933622570633916e-225 -8.205466933650709e-224): 0
* [misc]none:  (1.23513259853389e-199 -2.455637018443649e+26 -5.138936398971843e-75): 0
* [misc]none:  (4.3707194781987494e-97 -2.547315038123042e-87 3.4204094411255474e+115): 0
* [misc]none:  (31.114677989939693 2.800912164521124e-20 -3.2777951328230936e-29): 0
* [misc]none:  (-5.5773404803592965e+259 3.7931337372770976e-299 2.786772086490314e-60): 0
* [misc]none:  (-5.616681094429007e+40 3.096144630304459e-05 -3.1136499993102923e-28): 0
* [misc]none:  (2.1273566438007147e+264 2.075848018336343e+269 -1.6092812022702055e+27): 0
* [misc]none:  (-4.049616931519095e-12 5.231369250464457e+247 -8.701752776315519e+299): 0
* [misc]none:  (1.341667886706771e+115 3.8005266578165216e-258 -1.0098619973673771e+143): 0
* [misc]none:  (2.57846868660545e+128 1.8293764358985593e+179 -3.4049300239591715e+140): 0
* [misc]none:  (-3.2101962723934187e-96 7.417468591127432e+67 -3.877298803162118e-30): 0
* [misc]none:  (-1.8198742460941646e-81 -2.0820068164655182e+40 -7.236742688934569e+286): 0
* [misc]none:  (-8.323040591341415e+218 -4.677922974670643e+80 -6.692473243860769e+126): 0
* [misc]none:  (-1.9106041457506788e-63 3.747520792911468e+127 5.430483387973432e+258): 0
* [misc]none:  (2.2335992870926316e-153 1.4503417141831182e+51 2.0547294018965633e+61): 0
* [misc]none:  (7.852155885222424e-118 -2.8375357663701133e-215 6.513244922065764e-226): 0
* [misc]none:  (7.385144370900328e+173 -5.542636511154422e+167 7.908117764318118e+264): 0
* [misc]none:  (-2.441280553156046e-191 -8.5828334236211e+37 -1.0997158053453796e+52): 0
* [misc]none:  (6.819956828556854e+177 -3.987835231847739e-28 -1.3157971823804226e+26): 0
* [misc]none:  (3.2159945588434616e-06 5.306065123039819 -7.710049967444384e+140): 0
* [misc]none:  (9.03697438609635e-254 5.834916983599053e-288 -3.248874545341504e+57): 0
* [misc]none:  (-4.693794485448123e+266 -1.0182917238227828e-268 7.874050663202412e-138): 0
* [misc]none:  (-2.9961253346398193e-277 -4.2324566784967944e-196 -6.824787913341571e-74): 0
* [misc]none:  (8.573472507341022e+41 -3.1598975960421508e+277 -3.3169741611569367e+305): 0
* [misc]none:  (1.4410801258605738e+62 106537.6777769988 -2.6159166493367154e-235): 0
* [misc]none:  (-2.576894021693856e-173 -4.230280825094585e+83 8.062228390339164e-110): 0
* [misc]none:  (-1.8358840832683498e+44 -2.156801537654526e+36 -3.512703779155646e-87): 0
* [misc]none:  (-6.846939373244303e+227 2.125743593675342e+150 -3.1982664100230636e+83): 0
* [misc]none:  (-6.253340869605864e+291 1.4031893252788157e-130 -2.4878548514423325e+131): 0
* [misc]none:  (4.547656836966103e-26 -9.296466940750938e-169 2.3403140268290895e-220): 0
* [misc]none:  (-5.094827374807951e+22 -3.0047845617322243e+245 3.456521015844278e-267): 0
* [misc]none:  (5.548340076310199e-111 -5.686069957565031e-220 -4.479806301623672e-178): 0
* [misc]none:  (-2.3266982566628708e-73 -4.924557161248151e-49 2.0491433117473444e+251): 0
* [misc]none:  (2.1868710093441635e-94 -2.9110234445746466e+124 4.292734438749543e-07): 0
* [misc]none:  (-1.3160349663332311e-291 -1.0651455859079758e-283 4.626894916535224e-128): 0
* [misc]none:  (1.114170127871121e+259 8.453366577306196e-160 -8.935111048608571e-173): 0
* [misc]none:  (-5.548866558621532e-09 0.0019265340891290363 2.5107596839002617e-188): 0
* [misc]none:  (-2715439348210.3716 3.8364962842018573e-131 -8.310532646005735e-88): 0
* [misc]none:  (9.373070312843732e-91 -1.3476877676941842e+188 -1.1445296297917484e+276): 0
* [misc]none:  (-2.854465274914285e+95 1.5238038259281467e+97 -2.9771655786075137e-170): 0
* [misc]none:  (1.011727234239232e-268 5.76823955439101e-249 -2.0681820259142047e+203): 0
* [misc]none:  (-5.358736018951544e-210 -3.780049011953038e-263 -7.356146101163064e-142): 0
* [misc]none:  (-4.679560768974975e-224 -1.7581458633759795e+76 -2.615425031816684e-28): 0
* [misc]none:  (9.00969948519257e+300 -4.472004514616723e-118 2.4547241600019345e+232): 0
* [misc]none:  (7.022076711242115e-133 -7.904392031638281e+133 -5.94028418794007e+211): 0
* [misc]none:  (-9.328298623753299e+123 -1.0504234320141073e+133 2.943249346534323e+144): 0
* [misc]none:  (-5.6215764598070664e+281 7.885146171822741e-252 4.254787401710164e+249): 0
* [misc]none:  (1.376461838305041e-44 1.1351952620028756e+104 4.887341950722903e-119): 0
* [misc]none:  Picked alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * * * [misc]pick:  Picked  #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 2 1 2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 2 1 2 1 2)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (* 1/2 K)) J))) in 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]backup-simplify:  Simplify (log (/ 1/2 (cos (* 1/2 K)))) into (log (/ 1/2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (/ 1/2 (cos (* 1/2 K))))) into (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (+ (log U) (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))) into (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) into (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) into (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (+ (* (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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log U) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) into (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/2 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))
* [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 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (* 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (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 J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (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 (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 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 (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 J) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 J) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* -2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (* 0 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 1) (* 0 0)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (cos (* 1/2 K)))) into (- (* 2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* (- (* 2 (cos (* 1/2 K)))) (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))))))) into (- (* 2 (* (cos (* 1/2 K)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (* (cos (* 1/2 K)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (* 1/2 K)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) 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)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ U (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ U (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 (/ U (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (/ U 1) into U
* [misc]backup-simplify:  Simplify (* 1/2 U) into (* 1/2 U)
* [misc]backup-simplify:  Simplify (log (* 1/2 U)) into (log (* 1/2 U))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (log (* 1/2 U)) (- (log J))) into (- (log (* 1/2 U)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 U)) (log J))) into (* 2 (- (log (* 1/2 U)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 U)) (log J)))) into (exp (* 2 (- (log (* 1/2 U)) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1) into (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* U (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 U) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 U)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 U)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* 1 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))
* [misc]backup-simplify:  Simplify (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))) into (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))
* [misc]backup-simplify:  Simplify (- (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) into (- (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 U)) (log J)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 U)) (log J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 U)) (log J)) in U
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 U)) in U
* [misc]taylor:  Taking taylor expansion of (* 1/2 U) 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 U in U
* [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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))) into (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))) into (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (- (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into (- (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))))
* [misc]backup-simplify:  Simplify (- (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (- (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))) (* 0 (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log 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 (+ (* -2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* (- (* 2 (cos (* 1/2 K)))) 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (- (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) (* 1 (* 1 J))) into (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) J))
* [misc]approximate:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* -2 1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 K))) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) 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)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ 1/2 K)) U))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ 1/2 K)) U)) 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)) U) 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 U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) U) into (* (cos (/ 1/2 K)) U)
* [misc]backup-simplify:  Simplify (/ 1/2 (* (cos (/ 1/2 K)) U)) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ 1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* (cos (/ 1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) into (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) 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)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) 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 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)) in U
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ 1/2 K)) U))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ 1/2 K)) U)) 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 (* (cos (/ 1/2 K)) U) 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 U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (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 (- (/ 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)) 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]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (/ 1/2 (cos (/ 1/2 K))))) into (- (log (/ 1/2 (cos (/ 1/2 K)))) (log U))
* [misc]backup-simplify:  Simplify (+ (- (log (/ 1/2 (cos (/ 1/2 K)))) (log U)) (log J)) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) into (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 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 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)) (* 0 (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))) (* 0 (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (+ (* 0 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 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 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 U))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ 1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* (cos (/ 1/2 K)) U))) (* 0 (/ 0 (* (cos (/ 1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow J 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow J 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (* (cos (/ 1/2 (/ 1 K))) (sqrt (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1)))) (* 1 (* 1 (/ 1 (/ 1 J))))) into (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))
* [misc]approximate:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* -2 -1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 K))) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) 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 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ -1/2 K)) U))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ -1/2 K)) U)) 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)) U) 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 U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) U) into (* (cos (/ -1/2 K)) U)
* [misc]backup-simplify:  Simplify (/ 1/2 (* (cos (/ -1/2 K)) U)) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ -1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) into (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) 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 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)) in U
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ -1/2 K)) U))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ -1/2 K)) U)) 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 (* (cos (/ -1/2 K)) U) 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 U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (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 (- (/ 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)) 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]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (/ 1/2 (cos (/ -1/2 K))))) into (- (log (/ 1/2 (cos (/ -1/2 K)))) (log U))
* [misc]backup-simplify:  Simplify (+ (- (log (/ 1/2 (cos (/ -1/2 K)))) (log U)) (log J)) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) into (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- 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 (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))) (* 0 (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log 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) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (+ (* 0 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 U))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ -1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* (cos (/ -1/2 K)) U))) (* 0 (/ 0 (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow J 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow J 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (* (cos (/ -1/2 (/ 1 (- K)))) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1)))) (* 1 (* 1 (/ 1 (/ 1 (- J)))))) into (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))) (* (cos (* 1/2 K)) J)))
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 2 1 2)
* [misc]approximate:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (* 1/2 K)) J))) in 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]backup-simplify:  Simplify (log (/ 1/2 (cos (* 1/2 K)))) into (log (/ 1/2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (/ 1/2 (cos (* 1/2 K))))) into (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (+ (log U) (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))) into (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) into (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log U) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (+ (* (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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (* 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]approximate:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (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 J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) into (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))
* [misc]approximate:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (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 (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) into (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 2 1 2 1 2)
* [misc]approximate:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 2 (* 1 J)) into (* 2 J)
* [misc]approximate:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ 1/2 (/ 1 K)))) (* 1 (/ 1 (/ 1 J)))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (/ 1 (/ 1 (- J))))) into (* 2 (* (cos (* 1/2 K)) J))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2)))>
* * * * [misc]progress:  [ 2 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1)))>
* * * * [misc]progress:  [ 3 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 4 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 5 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 6 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (55 enodes)
* * [misc]simplify:  iters left: 3 (131 enodes)
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 7 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 8 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 9 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (101 enodes)
* * [misc]simplify:  iters left: 2 (324 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 10 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (202 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [enter]simplify:  Simplifying (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (90 enodes)
* * [misc]simplify:  iters left: 3 (337 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 11 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (187 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [enter]simplify:  Simplifying (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (127 enodes)
* * [misc]simplify:  iters left: 2 (484 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 12 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 13 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 14 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 15 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (154 enodes)
* * [misc]simplify:  iters left: 2 (391 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 16 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (154 enodes)
* * [misc]simplify:  iters left: 2 (391 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 17 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1))>
* * * * [misc]progress:  [ 18 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (69 enodes)
* * [misc]simplify:  iters left: 3 (153 enodes)
* * [misc]simplify:  iters left: 2 (404 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (cos (/ K 2))) (log (* J -2))) (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (+ (+ (log (cos (/ K 2))) (log (* J -2))) (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 19 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (log (* (* -2 J) (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (+ (log (* (* -2 J) (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (68 enodes)
* * [misc]simplify:  iters left: 3 (154 enodes)
* * [misc]simplify:  iters left: 2 (401 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (log (* (* J -2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (log (* (* J -2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 20 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (log (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (log (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (82 enodes)
* * [misc]simplify:  iters left: 3 (200 enodes)
* * [misc]simplify:  iters left: 2 (471 enodes)
* [exit]simplify:  Simplified to (log (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 21 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (log (exp (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (exp (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (79 enodes)
* * [misc]simplify:  iters left: 3 (166 enodes)
* * [misc]simplify:  iters left: 2 (407 enodes)
* [exit]simplify:  Simplified to (pow (pow (exp (* J -2)) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (pow (pow (exp (* J -2)) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 22 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (53 enodes)
* * [misc]simplify:  iters left: 4 (182 enodes)
* [exit]simplify:  Simplified to (* (+ (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2))))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (+ (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2))))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 23 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* -2 J) (cos (/ K 2))) (* (* -2 J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* -2 J) (cos (/ K 2))) (* (* -2 J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (154 enodes)
* [exit]simplify:  Simplified to (* (+ (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (pow (* (* J -2) (cos (/ K 2))) 3)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (+ (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (pow (* (* J -2) (cos (/ K 2))) 3)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 24 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (35 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 (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [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 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 25 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (112 enodes)
* * [misc]simplify:  iters left: 3 (430 enodes)
* [exit]simplify:  Simplified to (* (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (pow (* (* J -2) (cos (/ K 2))) 3)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (pow (* (* J -2) (cos (/ K 2))) 3)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 26 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [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 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [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 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 27 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* 1 (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 28 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (83 enodes)
* * [misc]simplify:  iters left: 3 (207 enodes)
* * [misc]simplify:  iters left: 2 (478 enodes)
* [exit]simplify:  Simplified to (* (* (* (* J -2) (cos (/ K 2))) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (* (* (* J -2) (cos (/ K 2))) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 29 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (73 enodes)
* * [misc]simplify:  iters left: 3 (162 enodes)
* * [misc]simplify:  iters left: 2 (394 enodes)
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 30 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [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 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 31 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt 1)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (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) (* J -2)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (* (sqrt 1) (* J -2)) (cos (/ K 2)))
* * * * [misc]progress:  [ 32 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [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 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 33 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (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)) (* J -2))
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (* J -2))
* * * * [misc]progress:  [ 34 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (326 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2)))
* * * * [misc]progress:  [ 35 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (41 enodes)
* * [misc]simplify:  iters left: 4 (88 enodes)
* * [misc]simplify:  iters left: 3 (261 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (pow (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 3))) (* (* J -2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (pow (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 3))) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 36 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (81 enodes)
* * [misc]simplify:  iters left: 3 (250 enodes)
* [exit]simplify:  Simplified to (* (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))) (* (* J -2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 37 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (* (* -2 J) (cos (/ K 2)))))>
* * * * [misc]progress:  [ 38 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (40 enodes)
* * [misc]simplify:  iters left: 3 (69 enodes)
* * [misc]simplify:  iters left: 2 (134 enodes)
* * [misc]simplify:  iters left: 1 (296 enodes)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* * * * [misc]progress:  [ 39 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (40 enodes)
* * [misc]simplify:  iters left: 3 (69 enodes)
* * [misc]simplify:  iters left: 2 (134 enodes)
* * [misc]simplify:  iters left: 1 (296 enodes)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* * * * [misc]progress:  [ 40 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) (* 1 2))))))>
* [enter]simplify:  Simplifying (* 1 2)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to 2
* [exit]simplify:  Simplified to 2
* * * * [misc]progress:  [ 41 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (pow (* (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) (cbrt (/ U (* (* 2 J) (cos (/ K 2)))))) 2) (pow (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (pow (* (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) (cbrt (/ U (* (* 2 J) (cos (/ K 2)))))) 2)
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (39 enodes)
* * [misc]simplify:  iters left: 1 (58 enodes)
* [exit]simplify:  Simplified to (* (/ (/ U (* J 2)) (cos (/ K 2))) (cbrt (/ (/ U (* J 2)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (/ (/ U (* J 2)) (cos (/ K 2))) (cbrt (/ (/ U (* J 2)) (cos (/ K 2)))))
* [enter]simplify:  Simplifying (pow (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (29 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)))))
* * * * [misc]progress:  [ 42 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2) (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (40 enodes)
* * [misc]simplify:  iters left: 1 (46 enodes)
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* [enter]simplify:  Simplifying (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (40 enodes)
* * [misc]simplify:  iters left: 1 (46 enodes)
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* * * * [misc]progress:  [ 43 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (pow 1 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (pow 1 2)
* * [misc]simplify:  iters left: 1 (3 enodes)
* [exit]simplify:  Simplified to 1
* [exit]simplify:  Simplified to 1
* [enter]simplify:  Simplifying (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (17 enodes)
* * [misc]simplify:  iters left: 4 (35 enodes)
* * [misc]simplify:  iters left: 3 (95 enodes)
* * [misc]simplify:  iters left: 2 (318 enodes)
* [exit]simplify:  Simplified to (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))
* * * * [misc]progress:  [ 44 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (pow U 2) (pow (/ 1 (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (pow U 2)
* * [misc]simplify:  iters left: 1 (3 enodes)
* [exit]simplify:  Simplified to (* U U)
* [exit]simplify:  Simplified to (* U U)
* [enter]simplify:  Simplifying (pow (/ 1 (* (* 2 J) (cos (/ K 2)))) 2)
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (37 enodes)
* * [misc]simplify:  iters left: 3 (88 enodes)
* * [misc]simplify:  iters left: 2 (299 enodes)
* [exit]simplify:  Simplified to (* (/ (/ 1 (* J 2)) (cos (/ K 2))) (/ (/ 1 (* J 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (/ (/ 1 (* J 2)) (cos (/ K 2))) (/ (/ 1 (* J 2)) (cos (/ K 2))))
* * * * [misc]progress:  [ 45 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (/ U (* (* 2 J) (cos (/ K 2)))) (/ U (* (* 2 J) (cos (/ K 2)))))))))>
* * * * [misc]progress:  [ 46 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 1)))))>
* * * * [misc]progress:  [ 47 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (log (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (log (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (143 enodes)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* * * * [misc]progress:  [ 48 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (log (exp (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (exp (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (38 enodes)
* * [misc]simplify:  iters left: 3 (98 enodes)
* * [misc]simplify:  iters left: 2 (321 enodes)
* [exit]simplify:  Simplified to (exp (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (exp (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 49 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (* (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (37 enodes)
* * [misc]simplify:  iters left: 3 (98 enodes)
* * [misc]simplify:  iters left: 2 (321 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))) (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))) (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (36 enodes)
* * [misc]simplify:  iters left: 3 (97 enodes)
* * [misc]simplify:  iters left: 2 (320 enodes)
* [exit]simplify:  Simplified to (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 50 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (cbrt (* (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (191 enodes)
* [exit]simplify:  Simplified to (pow (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 3)
* [exit]simplify:  Simplified to (pow (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 3)
* * * * [misc]progress:  [ 51 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (37 enodes)
* * [misc]simplify:  iters left: 3 (97 enodes)
* * [misc]simplify:  iters left: 2 (324 enodes)
* [exit]simplify:  Simplified to (fabs (/ (/ U (* J 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (fabs (/ (/ U (* J 2)) (cos (/ K 2))))
* [enter]simplify:  Simplifying (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (37 enodes)
* * [misc]simplify:  iters left: 3 (97 enodes)
* * [misc]simplify:  iters left: 2 (324 enodes)
* [exit]simplify:  Simplified to (fabs (/ (/ U (* J 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (fabs (/ (/ U (* J 2)) (cos (/ K 2))))
* * * * [misc]progress:  [ 52 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 53 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (pow (* (* 2 J) (cos (/ K 2))) 1)) 2)))))>
* [enter]simplify:  Simplifying (* (* 2 J) (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (7 enodes)
* * [misc]simplify:  iters left: 4 (11 enodes)
* * [misc]simplify:  iters left: 3 (17 enodes)
* * [misc]simplify:  iters left: 2 (18 enodes)
* [exit]simplify:  Simplified to (* (* J 2) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (* J 2) (cos (/ K 2)))
* * * * [misc]progress:  [ 54 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (pow (* (* 2 J) (cos (/ K 2))) 1)) 2)))))>
* * * * [misc]progress:  [ 55 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (exp (+ (log (* 2 J)) (log (cos (/ K 2)))))) 2)))))>
* [enter]simplify:  Simplifying (+ (log (* 2 J)) (log (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (14 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (24 enodes)
* [exit]simplify:  Simplified to (+ (log (* J 2)) (log (cos (/ K 2))))
* [exit]simplify:  Simplified to (+ (log (* J 2)) (log (cos (/ K 2))))
* * * * [misc]progress:  [ 56 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (exp (log (* (* 2 J) (cos (/ K 2)))))) 2)))))>
* [enter]simplify:  Simplifying (log (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (26 enodes)
* * [misc]simplify:  iters left: 3 (44 enodes)
* [exit]simplify:  Simplified to (log (* (* J 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (log (* (* J 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 57 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (log (exp (* (* 2 J) (cos (/ K 2)))))) 2)))))>
* [enter]simplify:  Simplifying (exp (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (14 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (31 enodes)
* * [misc]simplify:  iters left: 2 (42 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (pow (exp (+ J J)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (pow (exp (+ J J)) (cos (/ K 2)))
* * * * [misc]progress:  [ 58 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (cbrt (* (* (* (* 2 J) (* 2 J)) (* 2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))))) 2)))))>
* [enter]simplify:  Simplifying (* (* (* (* 2 J) (* 2 J)) (* 2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (77 enodes)
* * [misc]simplify:  iters left: 3 (243 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (pow (* J 2) 3)) (* (cos (/ K 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (pow (* J 2) 3)) (* (cos (/ K 2)) (cos (/ K 2))))
* * * * [misc]progress:  [ 59 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* (cbrt (* (* 2 J) (cos (/ K 2)))) (cbrt (* (* 2 J) (cos (/ K 2))))) (cbrt (* (* 2 J) (cos (/ K 2)))))) 2)))))>
* [enter]simplify:  Simplifying (* (cbrt (* (* 2 J) (cos (/ K 2)))) (cbrt (* (* 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 (20 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (* J 2) (cos (/ K 2)))) (cbrt (* (* J 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (cbrt (* (* J 2) (cos (/ K 2)))) (cbrt (* (* J 2) (cos (/ K 2)))))
* [enter]simplify:  Simplifying (cbrt (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (18 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (cbrt (* (* J 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (cbrt (* (* J 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 60 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (cbrt (* (* (* (* 2 J) (cos (/ K 2))) (* (* 2 J) (cos (/ K 2)))) (* (* 2 J) (cos (/ K 2)))))) 2)))))>
* [enter]simplify:  Simplifying (* (* (* (* 2 J) (cos (/ K 2))) (* (* 2 J) (cos (/ K 2)))) (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (55 enodes)
* * [misc]simplify:  iters left: 3 (168 enodes)
* [exit]simplify:  Simplified to (pow (* (* J 2) (cos (/ K 2))) 3)
* [exit]simplify:  Simplified to (pow (* (* J 2) (cos (/ K 2))) 3)
* * * * [misc]progress:  [ 61 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (sqrt (* (* 2 J) (cos (/ K 2)))) (sqrt (* (* 2 J) (cos (/ K 2)))))) 2)))))>
* [enter]simplify:  Simplifying (sqrt (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (18 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* J 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (sqrt (* (* J 2) (cos (/ K 2))))
* [enter]simplify:  Simplifying (sqrt (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (18 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* J 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (sqrt (* (* J 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 62 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* 1 (* (* 2 J) (cos (/ K 2))))) 2)))))>
* * * * [misc]progress:  [ 63 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2))))) 2)))))>
* [enter]simplify:  Simplifying (* (* 2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (38 enodes)
* * [misc]simplify:  iters left: 2 (42 enodes)
* [exit]simplify:  Simplified to (* (* 2 (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) J))
* [exit]simplify:  Simplified to (* (* 2 (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) J))
* * * * [misc]progress:  [ 64 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2))))) 2)))))>
* [enter]simplify:  Simplifying (* (* 2 J) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (18 enodes)
* * [misc]simplify:  iters left: 3 (19 enodes)
* [exit]simplify:  Simplified to (* (* J 2) (sqrt (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (* J 2) (sqrt (cos (/ K 2))))
* * * * [misc]progress:  [ 65 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) 1) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (* (* 2 J) 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 (* J 2)
* [exit]simplify:  Simplified to (* J 2)
* * * * [misc]progress:  [ 66 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* 2 (* J (cos (/ K 2))))) 2)))))>
* [enter]simplify:  Simplifying (* J (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (6 enodes)
* * [misc]simplify:  iters left: 4 (7 enodes)
* [exit]simplify:  Simplified to (* J (cos (/ K 2)))
* [exit]simplify:  Simplified to (* J (cos (/ K 2)))
* * * * [misc]progress:  [ 67 / 79 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (cos (/ K 2)) (* 2 J))) 2)))))>
* * * * [misc]progress:  [ 68 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (81 enodes)
* * [misc]simplify:  iters left: 3 (161 enodes)
* * [misc]simplify:  iters left: 2 (282 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (* 1/2 U) J) (/ (* 1/2 U) J)) 1)))
* * * * [misc]progress:  [ 69 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))
* * [misc]simplify:  iters left: 6 (26 enodes)
* * [misc]simplify:  iters left: 5 (55 enodes)
* * [misc]simplify:  iters left: 4 (119 enodes)
* * [misc]simplify:  iters left: 3 (335 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (* (* (* U (/ 1 J)) (/ 1/2 (cos (* K 1/2)))) (* (* U (/ 1 J)) (/ 1/2 (cos (* K 1/2))))))) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 70 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))))
* * [misc]simplify:  iters left: 6 (27 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (118 enodes)
* * [misc]simplify:  iters left: 3 (341 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* 1/2 K)))) (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* 1/2 K))))) 1)))
* * * * [misc]progress:  [ 71 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) J)))>
* [enter]simplify:  Simplifying (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) J))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (118 enodes)
* * [misc]simplify:  iters left: 2 (223 enodes)
* [exit]simplify:  Simplified to (* (* -2 J) (sqrt (+ (* (* U (/ 1/2 J)) (* U (/ 1/2 J))) 1)))
* * * * [misc]progress:  [ 72 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))))>
* [enter]simplify:  Simplifying (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))
* * [misc]simplify:  iters left: 6 (24 enodes)
* * [misc]simplify:  iters left: 5 (53 enodes)
* * [misc]simplify:  iters left: 4 (116 enodes)
* * [misc]simplify:  iters left: 3 (333 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (* (/ 1/2 (cos (* K 1/2))) (* U (/ 1 J))) (* (/ 1/2 (cos (* K 1/2))) (* U (/ 1 J)))) 1)) (* (* J -2) (cos (* K 1/2))))
* * * * [misc]progress:  [ 73 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))) (* (cos (* 1/2 K)) J))))>
* [enter]simplify:  Simplifying (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))) (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (116 enodes)
* * [misc]simplify:  iters left: 3 (331 enodes)
* [exit]simplify:  Simplified to (* (* (cos (* K 1/2)) (* -2 J)) (sqrt (+ 1 (* (* (/ 1/2 (cos (* K 1/2))) (/ (/ -1 J) (/ -1 U))) (* (/ 1/2 (cos (* K 1/2))) (/ (/ -1 J) (/ -1 U)))))))
* * * * [misc]progress:  [ 74 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (81 enodes)
* * [misc]simplify:  iters left: 3 (161 enodes)
* * [misc]simplify:  iters left: 2 (282 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (* (/ 1/2 J) U) (* (/ 1/2 J) U)) 1)))
* * * * [misc]progress:  [ 75 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))
* * [misc]simplify:  iters left: 6 (26 enodes)
* * [misc]simplify:  iters left: 5 (55 enodes)
* * [misc]simplify:  iters left: 4 (119 enodes)
* * [misc]simplify:  iters left: 3 (335 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (* (* (* U (/ 1 J)) (/ 1/2 (cos (* K 1/2)))) (* (* U (/ 1 J)) (/ 1/2 (cos (* K 1/2))))))) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 76 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))))
* * [misc]simplify:  iters left: 6 (27 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (118 enodes)
* * [misc]simplify:  iters left: 3 (341 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* 1/2 K)))) (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* 1/2 K))))) 1)))
* * * * [misc]progress:  [ 77 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* 2 J)) 2)))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* 2 J)) 2))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (58 enodes)
* * [misc]simplify:  iters left: 3 (111 enodes)
* * [misc]simplify:  iters left: 2 (182 enodes)
* * [misc]simplify:  iters left: 1 (259 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ 1 (* (/ (/ U J) 2) (/ (/ U J) 2)))))
* * * * [misc]progress:  [ 78 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* 2 (* (cos (* 1/2 K)) J))) 2)))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* 2 (* (cos (* 1/2 K)) J))) 2))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (72 enodes)
* * [misc]simplify:  iters left: 3 (165 enodes)
* * [misc]simplify:  iters left: 2 (401 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (/ (/ (* (/ U 2) (/ U 2)) (cos (* 1/2 K))) (* (* J J) (cos (* 1/2 K)))) 1)) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 79 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* 2 (* (cos (* 1/2 K)) J))) 2)))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* 2 (* (cos (* 1/2 K)) J))) 2))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (72 enodes)
* * [misc]simplify:  iters left: 3 (165 enodes)
* * [misc]simplify:  iters left: 2 (401 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (/ (/ (* (/ U 2) (/ U 2)) (cos (* 1/2 K))) (* (* J J) (cos (* 1/2 K)))) 1)) (* (* J -2) (cos (/ K 2))))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 2 / 4
* * * [misc]progress:  picking best candidate
* [misc]none:  Fresh alts: 5
* [misc]none:  All alts: 5
* [misc]none:  Fresh alt: (λ (J K U) (cbrt (* (+ (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (pow (* (* J -2) (cos (/ K 2))) 3)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [misc]none:  Fresh alt: (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* [misc]none:  Non-fresh alt: (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* [misc]none:  Fresh alt: (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* [misc]none:  Fresh alt: (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* [misc]none:  Fresh alt: (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* [misc]none:  Fresh alt indexes
* [misc]none:  (λ (J K U) (cbrt (* (+ (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (pow (* (* J -2) (cos (/ K 2))) 3)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))): 0
* [misc]none:  (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 1
* [misc]none:  (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 2
* [misc]none:  (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 3
* [misc]none:  (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 4
* [misc]none:  Best fresh alt per point
* [misc]none:  (1.8269212298308998e+214 1789977963981.046 -1.7899154283931006e-62): 1
* [misc]none:  (1.6281717766697912e+39 3.5243641367880456e+86 -3.0008256032154172e-176): 1
* [misc]none:  (-7.986330642950897e-117 1.1611754700502491e-55 8.728226238434233e-64): 1
* [misc]none:  (-1.6133455999823373e+110 -3.9890484917100117e+257 -1.5117832743647305e-21): 1
* [misc]none:  (3.928924306566786e-70 5.222760300460367e-180 -4.026134204708055e+160): 0
* [misc]none:  (2.281413649637054e-166 4.156243175149629e-181 -9.231874857928986e-255): 1
* [misc]none:  (-1.65054043818576e-39 -1.0058709145515093e+290 -4.753699147196455e-118): 1
* [misc]none:  (-4.805584106456354e-282 -0.15058815983267834 3.714800492587865e+85): 1
* [misc]none:  (-4.7089063680709754e+260 4.344802098601123e-298 4.508329239962989e+257): 1
* [misc]none:  (-1.211264682641895e-292 1.0495684746531957e+167 2.721003254105153e-81): 1
* [misc]none:  (-3.0671153252781823e-63 -7.74362334743424e+32 -2.2376851712564295e-118): 1
* [misc]none:  (1.64239269831532e+149 -1.576948173228613e+33 9.680698928511806e-32): 1
* [misc]none:  (1.954959341132994e-252 -7.83347153590065e-06 5.521334390623478e-06): 1
* [misc]none:  (-3.229654932887624e+201 -9.827696191097834e-18 -1.3343140776153144e-304): 1
* [misc]none:  (-9.906575581428813e+195 7.10957194421701e+200 -4.7756557550151386e+160): 1
* [misc]none:  (2.4256946179069016e+78 6.207394963032113e+30 -7.218692088264328e+54): 1
* [misc]none:  (8.781920275794267e+61 3.5618749791650757e+87 4.9372470656494625e-201): 0
* [misc]none:  (1.4446355009900792e+23 -3.5082856951249954e-122 9.917487178181935e-54): 0
* [misc]none:  (-7.01049497494046e-138 3.841494064694043e+276 3.642806409692576e+70): 1
* [misc]none:  (-3.326243684234595e+241 -7.587678445119084e+247 1.518078533135906e+61): 1
* [misc]none:  (1.5052438492777668e+214 1.5460201380138582e-108 6.354924490516637e-174): 1
* [misc]none:  (1.1935837539207151e+36 -1.6901036379481523e+68 5.558607723763576e+296): 0
* [misc]none:  (-5129.844514220037 -8.518839978003416e+199 5.0618502549145104e+216): 0
* [misc]none:  (-2.0899529309308688e-173 -1.3078423091955545e+95 8.726419779901594e-156): 1
* [misc]none:  (1.5484790382727637e+258 2.2758369496030736e+44 2.7646272679971947e+138): 1
* [misc]none:  (1.8029164814151534e-305 -8.140052952226443e-29 -3.868827374468717e+273): 1
* [misc]none:  (-9.30868828487235e-242 7.865810923274834e+251 -1.977339157633397e-22): 1
* [misc]none:  (-12396.634829186376 2.0737883409435182e-60 8.938208620266642e-81): 1
* [misc]none:  (-1.0125994980022202e+121 9.949795070357293e-13 3.9753155304068916e+192): 1
* [misc]none:  (-1.5751944823937151e-208 -5.711690539427335e-292 2.0698086438592394e+99): 1
* [misc]none:  (8.149794087375897e+77 1.4399038101240658e-157 -0.0033935472374883513): 0
* [misc]none:  (-1.873060887288803e+204 6.486236446634097e-143 -6.777569686362558e+23): 1
* [misc]none:  (-3.976258322985434e+241 1.0713666056080785e-84 -1.4481584190101499e-109): 1
* [misc]none:  (1.8890847145741933e+54 5.334416108525731e+103 8.243928876632343e+120): 1
* [misc]none:  (4.915746009665795e+153 -1.2716911445748643e-294 -1.178199525484178e+291): 1
* [misc]none:  (-2.616452914461827e+123 -1.3552545859518693e-149 1.0769411808120101e+237): 1
* [misc]none:  (2.7212207505395135e+138 -1.7192030807828345e+260 -3.070590530502344e+254): 1
* [misc]none:  (4.3361011341035273e+108 -7.078347720981057e+296 -1.1633032638785635e+290): 0
* [misc]none:  (-2.3832835734274537e-77 -2.0550237535049573e-58 3.3652051120813564e-167): 1
* [misc]none:  (-1.6071108269264857e+240 2.2507296241296892e-278 -8.625502649886978e-116): 1
* [misc]none:  (-7.605291673043568e+86 1.3555181915244097e+58 5.535572593369702e+234): 1
* [misc]none:  (1.1281253812481777e-05 -7.875416682732296e+153 2.953059473116585e-77): 1
* [misc]none:  (-1.7943678282584236e+305 -8.253144371362014e+269 1.6962188327979892e+156): 1
* [misc]none:  (-3.0357430466827192e+202 7.526837789610841e+223 -1.0160940285787676e+119): 1
* [misc]none:  (6.853656747763464e-298 1.5907488733120222e-68 -4.474252265840201e+73): 1
* [misc]none:  (1.3833425279814779e+61 -4.807303049624254e-15 1.8641906072853124e-122): 0
* [misc]none:  (-3.0274687809727364e-300 7.50358512361513e-69 1.5464847509065313e+116): 1
* [misc]none:  (-7.218711869488973e-243 -587327855578134.2 -3.1846212263600816e-18): 1
* [misc]none:  (4.242186305736945e+277 7.288958178428041e-256 5.409384226193089e+76): 1
* [misc]none:  (-2.319372457341872e-287 4.187380162585325e-193 -1.32843112383632e+222): 1
* [misc]none:  (-1.1299275128362188e+120 6.659322155044152e+223 -2.5903554766194963e+287): 0
* [misc]none:  (-7.84381588726745e-44 3.9248553939523704e-204 -2.4810437085982083e-110): 0
* [misc]none:  (2.623583837461381e+148 -4.810065069789271e-38 1.6579472731822137e+209): 1
* [misc]none:  (7.148125858281279e-128 -1.1410424941898917e-307 -7.884101440606108e+43): 1
* [misc]none:  (3.2782900783384907e+260 1.2654023023741973e+87 5.3297020297971135e-251): 2
* [misc]none:  (4.360233270161975e+69 -1.2973858626691246e+248 -1.3038350073216301e+175): 4
* [misc]none:  (6.186245288104366e-177 4.0009214940503626e-296 -3.1670246594447204e-244): 1
* [misc]none:  (-4.944977315465704e+134 3.7946864491882027e-174 7.967379897939584e-266): 1
* [misc]none:  (5.338353252944482e+295 2.475773952907049e-271 5.261531518469373e-290): 1
* [misc]none:  (2.555657911489638e+100 2.1545947154827896e+229 2.6209188754640728e+107): 1
* [misc]none:  (1.0367654190214238e+155 7.510167254913154e-75 -1.879438806525893e-17): 1
* [misc]none:  (-2.2458375637103902e-132 -9.791675790911144e+50 5.462119320563526e+16): 3
* [misc]none:  (-7.461408405072584e-11 2.819362408294866e+247 5.576422555370537e+229): 0
* [misc]none:  (-1.2634592988240547e+184 -2.046312445248254e+167 -2.5768688170454604e-166): 4
* [misc]none:  (-2.3695265370701153e-160 5.627370989949808e+102 -1.1307817728525e-192): 1
* [misc]none:  (2.729599448498006e-142 1.268161462925599e-223 1.8558602765266175e+154): 1
* [misc]none:  (8.010626774664954e-118 3.197294045188449e-213 -3.8061627632242695e+220): 1
* [misc]none:  (1.4601547257514377e-37 6.851358071879168e+277 -1.4026731237337527e+299): 0
* [misc]none:  (1.2309532522175715e-227 5.849070875002102e-168 -1.8322924530722165e+176): 1
* [misc]none:  (2.6481468427206757e-89 1.8304705420573128e+300 5.162437418074754e-216): 1
* [misc]none:  (5.884862647618943e+102 1.3917287586797797e+215 -1.9484215729108895e+208): 2
* [misc]none:  (2.7534373406057187e+274 -6.754823491493555e-24 -2.4266153803656513e-110): 1
* [misc]none:  (2.802805856656922e+299 3267744482859.4893 -2.125403821003621e+259): 1
* [misc]none:  (-5.821161027096475e-49 4.3906960513010925e-288 9.735553079850294e-195): 0
* [misc]none:  (-2.4642361000377723e+179 -223338690.5739434 2.617385806499904e-208): 1
* [misc]none:  (6.454193966659965e-12 1.2843486366644783e+218 1.6598105327534946e+245): 0
* [misc]none:  (-2.2565106546246065e+111 -8.921793657844595e+241 -1.2504926677350782e+286): 0
* [misc]none:  (2142884768423.9766 -1.0342577969053837e-127 1.1325567110922881e-222): 1
* [misc]none:  (6.352964037059704e-48 2.0675888684205106e-37 3.9955309460256863e-193): 0
* [misc]none:  (-6.802352065741283e-237 1.7860466700053246e+179 -2.1540953112813662e-178): 1
* [misc]none:  (-1.1984894069610523e-255 2.286904329311883e+176 -3.0869297245392077e+307): 1
* [misc]none:  (-7.242911167116891e-28 -3.652961257321153e+269 -1.981435962910265e-248): 4
* [misc]none:  (1.434478809327731e-162 1.7673263201240207e+200 4.1358060479750856e+163): 1
* [misc]none:  (2.77377213114978e+181 -2.5233739143143128e-166 7.0699594918945535e-177): 1
* [misc]none:  (1.5437232098269186e+160 -5.1984298768145166e+116 -1.2768311469464077e-95): 1
* [misc]none:  (-4.0802892718556596e+97 -4.502005664483894e-90 -1.3669353810280968e+130): 3
* [misc]none:  (3.5925206879521377e-169 -1.3877894503805502e+162 3.851639943546658e-220): 1
* [misc]none:  (7.262940842293714e+141 2.5169641752150834e-130 -2.4010908942747236e-247): 1
* [misc]none:  (1.5786239562667337e+192 -1.646250865837071e-08 -4.6981533625942616e-48): 1
* [misc]none:  (-1.3666403621362786e-250 1175954691713314.2 1.6505576250215693e+254): 1
* [misc]none:  (-8.454483141733306e+289 3.2999709724191907e-111 -6.317430000587058e+24): 1
* [misc]none:  (-4.671984247068368e+114 -2.9619260441588295e+211 -7.22878673519174e-279): 1
* [misc]none:  (-3.759430214395936e-120 -1.445629235880647e+140 2.1262474173228004e+275): 1
* [misc]none:  (2.0609285567281652e-241 1.9640202737101926e+158 4.0355590295024944e+30): 1
* [misc]none:  (-3.1297081963080297e-242 8.94051254019841e+73 -1.0418876601412776e+158): 1
* [misc]none:  (1.334212127520659e-194 2.3042294780211474e+199 -0.1449571473562267): 1
* [misc]none:  (-1.322393042309631e-287 331.0762921520269 2.486727752761897e+186): 1
* [misc]none:  (6.1692613790114145e-176 3.16347551928874e-213 -1.999009223927216e-112): 1
* [misc]none:  (1.6628640493696272e+86 -1.5025592441357432e-91 1.526533864556896e-136): 0
* [misc]none:  (-1.1590427293178154e-110 2.3621708607435707e+306 -2.12081898299509e-251): 1
* [misc]none:  (-4.444969967255464e-50 -7.309457855467372e+172 -5.496412463214942e+159): 0
* [misc]none:  (-1.4721600470373534e-29 3.795139234164696e-109 9.806701774277626e-103): 0
* [misc]none:  (-3.123985774571585e+305 4.3713778543032466e+80 9.77689775396416e+270): 1
* [misc]none:  (-3.9142022803361806e-187 -5.65740503188699e+260 5.701436151254667e-51): 2
* [misc]none:  (-4.0509904466518765e-37 -6.2678543781187986e-158 2.6870891996869854e+222): 0
* [misc]none:  (1.403842517343178e+239 -4.523272375047282e+19 -3.133147621079016e+299): 1
* [misc]none:  (-3.1263201082196465e-277 4.562606033317646e+142 2.1157410136365666e+27): 1
* [misc]none:  (1.7344997138936077e-42 -3.913559470208424e-83 -2.9867969528063676e+265): 0
* [misc]none:  (3.0173777232564683e+257 1.4365336082533024e-65 7.3222795686052666e+50): 1
* [misc]none:  (-9.290387573799883e-227 2.1939039916199917e-151 6.704445560737266e-185): 1
* [misc]none:  (-9.568307378321542e-67 3.826389705571192e+305 3.2252529629473372e-164): 0
* [misc]none:  (-1.7144787029551547e-76 1945731255459.47 3.4149900413992998e-118): 0
* [misc]none:  (-3.9457481405050707e-140 -3.8831186001124554e+177 3.9566905915205435e+222): 1
* [misc]none:  (-4.045276803805828e+248 2.0407374713985817e-67 6.798712177335776e+112): 1
* [misc]none:  (-1.7506244038659656e+155 -5.551664099930396e+287 1.622208144463601e-166): 1
* [misc]none:  (-8.556050344850203e+96 -7.922576985868201e-83 2.1548182655933656e-147): 0
* [misc]none:  (-1.7889344297298395e-138 8.336613082028674e+83 -5.612374503803972e+191): 1
* [misc]none:  (2.208377572236396e-264 1.625924245506842e+101 3.6974324674576528e-196): 3
* [misc]none:  (1.194352601301008e+170 -1.2990710049317618e+149 -7.565112997028972e+159): 1
* [misc]none:  (1.1658351917668372e+172 1.3349160645071676e+249 2.931040211928409e-256): 1
* [misc]none:  (-2.439121548558237e-263 7.971191617216227e+278 -5.16988167177608e+53): 1
* [misc]none:  (2.6969709464868204e+192 -3.288801652693557e-126 -1.1724467728438874e+62): 1
* [misc]none:  (2.4787821728961726e-208 -4.583226060750687e+286 4.5505475745463453e+70): 1
* [misc]none:  (-4.7627047558420924e-178 9.818158704343799e+98 1.0173157545581e-152): 1
* [misc]none:  (-5.541734639256592e-158 6.582912119010719e-154 -2.7755596952545536e+214): 1
* [misc]none:  (-6.937852684341488e-17 -3.509811603569984e-162 1.0023146616707945e-196): 1
* [misc]none:  (-1.102805383752407e+91 -1.1833316978686804e-196 -2.074828050091204e+43): 1
* [misc]none:  (-1.6730371273659853e+134 7.03833207774333e+15 -1.3239959970038969e+98): 1
* [misc]none:  (4.1286963732031184e-303 -5.2489676640999375e-37 1.37725435443438e-133): 1
* [misc]none:  (2.7744697188841963e+109 -6.937438758466827e-192 -3.3253159094181508e+99): 1
* [misc]none:  (1.3198936947099211e-96 -1.5451834902703197e-42 -1.7726057829102443e-75): 3
* [misc]none:  (2.332651968655402e-142 -1.0504139891547427e+112 1.714387790028798e+53): 1
* [misc]none:  (1.0835466360416472e+257 2.2433259629035416e-110 4.4964231441929855e-212): 1
* [misc]none:  (-1.1740030617157484e-279 -1.2604014885172566e-16 -3.533444382159577e+294): 1
* [misc]none:  (4.163796059008999e+263 9.568517745632325e+214 2.9372247799245325e+93): 1
* [misc]none:  (3.280888101399023e-178 2.4645417753990825e-46 1.1531681692158285e+126): 1
* [misc]none:  (-2.094542504845539e+96 3.658887962688304e-221 -8.114819311899108e-200): 0
* [misc]none:  (-3.106463349287814e-283 -3194.11813336966 3.8921610463731365e-84): 1
* [misc]none:  (-8.851204171241843e+281 -9.262519032529967e-34 -1.785130886221006e+231): 1
* [misc]none:  (5.244418714777191e-247 -1.1047298144911661e-128 -3.806792758567173e-77): 1
* [misc]none:  (8.483535156875368e-302 -1.345613125533753e+279 -1.8508777881935605e+151): 1
* [misc]none:  (-0.0006673038257262197 2.8621091346925045e-294 1.532108192832722e+128): 1
* [misc]none:  (-5.0502610074661083e+207 3.789685423350582e-08 -1.2565837085170136e-39): 1
* [misc]none:  (1.762534146009323e+140 -1.0334310654904308e-302 6.545384967014291e-225): 1
* [misc]none:  (9.107018310586045e+54 -2.971342031183356e+89 -1.6718446752859893e+111): 1
* [misc]none:  (4.918436108504659e-301 -2.0718283319643413e+202 -1.6194758145392415e-55): 1
* [misc]none:  (1.6691081971097037e+94 -7.498270199484197e+128 2.7394548302027227e-88): 0
* [misc]none:  (-3.8474489635359294e+91 3.118009484335783e-104 -5.8304170084179074e-46): 0
* [misc]none:  (-2.67503022703027e-297 -2.5128760687731143e+95 8995869217554.457): 1
* [misc]none:  (-1.9632140373363783e+122 1.2420866124564814e-293 6.3461851602547e-177): 1
* [misc]none:  (-3.432853067516309e-246 2.0914477614867384e-227 2.01314860958205e-179): 1
* [misc]none:  (4.1821161712206335e+98 -1.06513481701701e-107 -4.126212717690705e-129): 0
* [misc]none:  (-6.0258374336189325e+121 1.241885419647938e+111 3.5248326356674874e-60): 1
* [misc]none:  (-185563564389128.0 -3.2505753217846565e-280 -3.802991462899128e-34): 0
* [misc]none:  (2.5937923840174148e+191 2.0634010725481968e+279 -6.71288738518563e+35): 1
* [misc]none:  (-1.3468517163131261e+272 3.7544706354148685e+249 -5.537735150627702e+213): 1
* [misc]none:  (1.740072246435861e-207 1.3636559368742825e-149 1.946944651699716e-139): 1
* [misc]none:  (6.333153678225876e-68 8.70336562916574e-216 7.84549397492709e+169): 0
* [misc]none:  (6363.313367940982 -1.977991260671615e-272 7.762114448443534e+255): 0
* [misc]none:  (1.682179526351612e+60 1.3399459123824423e-08 -2.0088395627297287e+293): 0
* [misc]none:  (-2.0811417072211844e+239 -2.4464470346425223e-307 6.330170018440137e-77): 1
* [misc]none:  (6.04623429007003e-242 -4.345326241698038e-278 5.823432666941199e+232): 1
* [misc]none:  (-3.1969871529936574e+166 3.226368417375545e+273 3.982342803919231e-46): 1
* [misc]none:  (-1.1442254260677068e-38 -1.1682833194119885e+290 1.7119636201650242e-68): 1
* [misc]none:  (5.22304174043592e-158 -3.807000870050907e+58 -1.6925574577510237e+214): 1
* [misc]none:  (8.377477023109926e-106 2.3080855823624493e-299 4.50326449267665e+246): 0
* [misc]none:  (1.0100264902476595e-152 6.2370208452565505e-251 -1.3788511600691207e+143): 1
* [misc]none:  (-9.563665845262864e+134 -4.34857343156037e+281 6.2285928439400495e+156): 1
* [misc]none:  (0.002518103001908201 2.819308104709626e+146 -4.0300440872978227e-184): 0
* [misc]none:  (1.4105181521169557e+85 -2.665217209595492e+188 3.5241094689699846e+143): 3
* [misc]none:  (4.19388438569828e-183 3.636662419716013e-100 -1.2948317804463169e-282): 1
* [misc]none:  (-2.8090151520671207e+163 2.984404923140836e-249 5.437516292888218e-268): 1
* [misc]none:  (5.520248382898629e-230 6.71342285975285e-63 -3.464947738442053e-155): 1
* [misc]none:  (4.004060788521414e+101 5.679811834757315e+283 -6.473810795939257e+164): 1
* [misc]none:  (3.588388254213374e-229 -1139547812.809111 4.890275917515567e-08): 1
* [misc]none:  (-5.005096670380054e+47 -1.1716631781329626e-278 2.3982589341782892e+126): 1
* [misc]none:  (-3.4998489762015864e-219 1.2430204782976187e-178 -1.9903644617661157e-253): 1
* [misc]none:  (-2.385315376938663e+253 1.6672558556111832e-132 -5.52786254698352e+123): 1
* [misc]none:  (-3.3129658515159495e+106 -2.2098708111796672e-198 -2.404284016476968e+279): 0
* [misc]none:  (1.233722688499856e-260 -3.5028343458937535e-90 5.227910927587319e+245): 1
* [misc]none:  (-63767.21419834566 -1.7606249358192524e+273 267950632.53292695): 0
* [misc]none:  (5.624641690736252e-214 8.322805913504859e+214 3.2616756987284277e-94): 4
* [misc]none:  (5.772678079688886e-193 -6.744341629118722e+132 6.954230926244437e-248): 1
* [misc]none:  (-8.888663579267588e+145 -1.2824561231119317e-43 -5.084319674250709e+292): 1
* [misc]none:  (1.2017614084255727e-118 2.163051204570009e+135 -9.483463323409894e+83): 1
* [misc]none:  (1.3207468552144425e-275 1.2439278636891217e+233 1.1524614864139226e-160): 1
* [misc]none:  (1.5181493189729785e-210 2.5055367778394023e+168 161620833577619.34): 1
* [misc]none:  (2.9543484210487e+68 -4.0220565746330086e+125 -1.6011896215578737e-278): 1
* [misc]none:  (-8.84696133260257e-277 1.0241174400059815e-119 -1.279384825639919e+218): 1
* [misc]none:  (-4.0734910927239613e+279 -2.2941123619407014e-42 -1.5101815541228603e-252): 1
* [misc]none:  (4.849304008883996e+136 -1.9158965524986357e+21 -1.0078494497283481e-63): 2
* [misc]none:  (-4.666260546447364e-94 7.089677021982108e+243 5.396180940081133e+274): 0
* [misc]none:  (-1.0374694539724338e-22 3.1474503815022313e+156 2.237363577109642e+74): 4
* [misc]none:  (1.6588937679962464e-112 3.192528639732453e+177 -5.90661572185385e+255): 1
* [misc]none:  (1.1908969294818754e-266 3.099784283699168e-174 -4.3665826438370466e+132): 1
* [misc]none:  (-1.0295936791749538e-299 -2.3878879079615316e+176 -2.7604299366199517e-300): 1
* [misc]none:  (-7.185580883046913e-107 -9.568148082725508e-90 -1.9577524593014605e+255): 0
* [misc]none:  (2.4666697643039057e+135 -9.953058197226308e-231 -1.6523309537219388e+292): 0
* [misc]none:  (1.4077992202573094e+157 -1.6969785717566782e-186 1.2222350343583978e+196): 1
* [misc]none:  (-1.4775843798497103e-226 1.13308848626096e-94 -1.0922245877481088e-202): 1
* [misc]none:  (4.042918419768235e-293 -3.2304680091420593e+273 -1.5418757249344543e-63): 1
* [misc]none:  (-1.5808149525401404e+250 3.027496459540811e+165 -1.2288638190895444e-91): 1
* [misc]none:  (-2.2214116445848722e-125 7.06806421332372e-195 -1.6177284163081556e-296): 1
* [misc]none:  (1.3558740031834803e-64 -9.115550998149062e+67 -4.7657636456813475e+188): 0
* [misc]none:  (6.054739181733751e+60 -3.7471130771905855e-70 -1.652280336936078e-182): 1
* [misc]none:  (-5.086606424901955e-26 -4.150888523033341e+56 2.5369593669384417e-158): 1
* [misc]none:  (4.1567543090652754e-33 -7.628468316635274e+118 -2.1412051815551306e+98): 0
* [misc]none:  (-7.67790351718318e-207 -1.1396663342585698e+185 -1.4047943834222912e+32): 1
* [misc]none:  (1.0167208681953543e+192 1.5933622570633916e-225 -8.205466933650709e-224): 1
* [misc]none:  (1.23513259853389e-199 -2.455637018443649e+26 -5.138936398971843e-75): 3
* [misc]none:  (4.3707194781987494e-97 -2.547315038123042e-87 3.4204094411255474e+115): 0
* [misc]none:  (31.114677989939693 2.800912164521124e-20 -3.2777951328230936e-29): 1
* [misc]none:  (-5.5773404803592965e+259 3.7931337372770976e-299 2.786772086490314e-60): 1
* [misc]none:  (-5.616681094429007e+40 3.096144630304459e-05 -3.1136499993102923e-28): 1
* [misc]none:  (2.1273566438007147e+264 2.075848018336343e+269 -1.6092812022702055e+27): 1
* [misc]none:  (-4.049616931519095e-12 5.231369250464457e+247 -8.701752776315519e+299): 0
* [misc]none:  (1.341667886706771e+115 3.8005266578165216e-258 -1.0098619973673771e+143): 1
* [misc]none:  (2.57846868660545e+128 1.8293764358985593e+179 -3.4049300239591715e+140): 1
* [misc]none:  (-3.2101962723934187e-96 7.417468591127432e+67 -3.877298803162118e-30): 0
* [misc]none:  (-1.8198742460941646e-81 -2.0820068164655182e+40 -7.236742688934569e+286): 0
* [misc]none:  (-8.323040591341415e+218 -4.677922974670643e+80 -6.692473243860769e+126): 1
* [misc]none:  (-1.9106041457506788e-63 3.747520792911468e+127 5.430483387973432e+258): 0
* [misc]none:  (2.2335992870926316e-153 1.4503417141831182e+51 2.0547294018965633e+61): 1
* [misc]none:  (7.852155885222424e-118 -2.8375357663701133e-215 6.513244922065764e-226): 1
* [misc]none:  (7.385144370900328e+173 -5.542636511154422e+167 7.908117764318118e+264): 1
* [misc]none:  (-2.441280553156046e-191 -8.5828334236211e+37 -1.0997158053453796e+52): 1
* [misc]none:  (6.819956828556854e+177 -3.987835231847739e-28 -1.3157971823804226e+26): 1
* [misc]none:  (3.2159945588434616e-06 5.306065123039819 -7.710049967444384e+140): 1
* [misc]none:  (9.03697438609635e-254 5.834916983599053e-288 -3.248874545341504e+57): 1
* [misc]none:  (-4.693794485448123e+266 -1.0182917238227828e-268 7.874050663202412e-138): 1
* [misc]none:  (-2.9961253346398193e-277 -4.2324566784967944e-196 -6.824787913341571e-74): 1
* [misc]none:  (8.573472507341022e+41 -3.1598975960421508e+277 -3.3169741611569367e+305): 0
* [misc]none:  (1.4410801258605738e+62 106537.6777769988 -2.6159166493367154e-235): 0
* [misc]none:  (-2.576894021693856e-173 -4.230280825094585e+83 8.062228390339164e-110): 4
* [misc]none:  (-1.8358840832683498e+44 -2.156801537654526e+36 -3.512703779155646e-87): 0
* [misc]none:  (-6.846939373244303e+227 2.125743593675342e+150 -3.1982664100230636e+83): 1
* [misc]none:  (-6.253340869605864e+291 1.4031893252788157e-130 -2.4878548514423325e+131): 1
* [misc]none:  (4.547656836966103e-26 -9.296466940750938e-169 2.3403140268290895e-220): 1
* [misc]none:  (-5.094827374807951e+22 -3.0047845617322243e+245 3.456521015844278e-267): 0
* [misc]none:  (5.548340076310199e-111 -5.686069957565031e-220 -4.479806301623672e-178): 1
* [misc]none:  (-2.3266982566628708e-73 -4.924557161248151e-49 2.0491433117473444e+251): 0
* [misc]none:  (2.1868710093441635e-94 -2.9110234445746466e+124 4.292734438749543e-07): 1
* [misc]none:  (-1.3160349663332311e-291 -1.0651455859079758e-283 4.626894916535224e-128): 1
* [misc]none:  (1.114170127871121e+259 8.453366577306196e-160 -8.935111048608571e-173): 1
* [misc]none:  (-5.548866558621532e-09 0.0019265340891290363 2.5107596839002617e-188): 1
* [misc]none:  (-2715439348210.3716 3.8364962842018573e-131 -8.310532646005735e-88): 0
* [misc]none:  (9.373070312843732e-91 -1.3476877676941842e+188 -1.1445296297917484e+276): 0
* [misc]none:  (-2.854465274914285e+95 1.5238038259281467e+97 -2.9771655786075137e-170): 0
* [misc]none:  (1.011727234239232e-268 5.76823955439101e-249 -2.0681820259142047e+203): 1
* [misc]none:  (-5.358736018951544e-210 -3.780049011953038e-263 -7.356146101163064e-142): 1
* [misc]none:  (-4.679560768974975e-224 -1.7581458633759795e+76 -2.615425031816684e-28): 1
* [misc]none:  (9.00969948519257e+300 -4.472004514616723e-118 2.4547241600019345e+232): 1
* [misc]none:  (7.022076711242115e-133 -7.904392031638281e+133 -5.94028418794007e+211): 1
* [misc]none:  (-9.328298623753299e+123 -1.0504234320141073e+133 2.943249346534323e+144): 1
* [misc]none:  (-5.6215764598070664e+281 7.885146171822741e-252 4.254787401710164e+249): 1
* [misc]none:  (1.376461838305041e-44 1.1351952620028756e+104 4.887341950722903e-119): 1
* [misc]none:  All alt indexes
* [misc]none:  (λ (J K U) (cbrt (* (+ (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (pow (* (* J -2) (cos (/ K 2))) 3)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))): 0
* [misc]none:  (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 1
* [misc]none:  (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))): 2
* [misc]none:  (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 3
* [misc]none:  (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 4
* [misc]none:  (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 5
* [misc]none:  Best alt per point
* [misc]none:  (1.8269212298308998e+214 1789977963981.046 -1.7899154283931006e-62): 1
* [misc]none:  (1.6281717766697912e+39 3.5243641367880456e+86 -3.0008256032154172e-176): 1
* [misc]none:  (-7.986330642950897e-117 1.1611754700502491e-55 8.728226238434233e-64): 1
* [misc]none:  (-1.6133455999823373e+110 -3.9890484917100117e+257 -1.5117832743647305e-21): 1
* [misc]none:  (3.928924306566786e-70 5.222760300460367e-180 -4.026134204708055e+160): 0
* [misc]none:  (2.281413649637054e-166 4.156243175149629e-181 -9.231874857928986e-255): 1
* [misc]none:  (-1.65054043818576e-39 -1.0058709145515093e+290 -4.753699147196455e-118): 1
* [misc]none:  (-4.805584106456354e-282 -0.15058815983267834 3.714800492587865e+85): 1
* [misc]none:  (-4.7089063680709754e+260 4.344802098601123e-298 4.508329239962989e+257): 1
* [misc]none:  (-1.211264682641895e-292 1.0495684746531957e+167 2.721003254105153e-81): 1
* [misc]none:  (-3.0671153252781823e-63 -7.74362334743424e+32 -2.2376851712564295e-118): 1
* [misc]none:  (1.64239269831532e+149 -1.576948173228613e+33 9.680698928511806e-32): 1
* [misc]none:  (1.954959341132994e-252 -7.83347153590065e-06 5.521334390623478e-06): 1
* [misc]none:  (-3.229654932887624e+201 -9.827696191097834e-18 -1.3343140776153144e-304): 1
* [misc]none:  (-9.906575581428813e+195 7.10957194421701e+200 -4.7756557550151386e+160): 1
* [misc]none:  (2.4256946179069016e+78 6.207394963032113e+30 -7.218692088264328e+54): 1
* [misc]none:  (8.781920275794267e+61 3.5618749791650757e+87 4.9372470656494625e-201): 0
* [misc]none:  (1.4446355009900792e+23 -3.5082856951249954e-122 9.917487178181935e-54): 0
* [misc]none:  (-7.01049497494046e-138 3.841494064694043e+276 3.642806409692576e+70): 1
* [misc]none:  (-3.326243684234595e+241 -7.587678445119084e+247 1.518078533135906e+61): 1
* [misc]none:  (1.5052438492777668e+214 1.5460201380138582e-108 6.354924490516637e-174): 1
* [misc]none:  (1.1935837539207151e+36 -1.6901036379481523e+68 5.558607723763576e+296): 0
* [misc]none:  (-5129.844514220037 -8.518839978003416e+199 5.0618502549145104e+216): 0
* [misc]none:  (-2.0899529309308688e-173 -1.3078423091955545e+95 8.726419779901594e-156): 1
* [misc]none:  (1.5484790382727637e+258 2.2758369496030736e+44 2.7646272679971947e+138): 1
* [misc]none:  (1.8029164814151534e-305 -8.140052952226443e-29 -3.868827374468717e+273): 1
* [misc]none:  (-9.30868828487235e-242 7.865810923274834e+251 -1.977339157633397e-22): 1
* [misc]none:  (-12396.634829186376 2.0737883409435182e-60 8.938208620266642e-81): 1
* [misc]none:  (-1.0125994980022202e+121 9.949795070357293e-13 3.9753155304068916e+192): 1
* [misc]none:  (-1.5751944823937151e-208 -5.711690539427335e-292 2.0698086438592394e+99): 1
* [misc]none:  (8.149794087375897e+77 1.4399038101240658e-157 -0.0033935472374883513): 0
* [misc]none:  (-1.873060887288803e+204 6.486236446634097e-143 -6.777569686362558e+23): 1
* [misc]none:  (-3.976258322985434e+241 1.0713666056080785e-84 -1.4481584190101499e-109): 1
* [misc]none:  (1.8890847145741933e+54 5.334416108525731e+103 8.243928876632343e+120): 1
* [misc]none:  (4.915746009665795e+153 -1.2716911445748643e-294 -1.178199525484178e+291): 1
* [misc]none:  (-2.616452914461827e+123 -1.3552545859518693e-149 1.0769411808120101e+237): 1
* [misc]none:  (2.7212207505395135e+138 -1.7192030807828345e+260 -3.070590530502344e+254): 2
* [misc]none:  (4.3361011341035273e+108 -7.078347720981057e+296 -1.1633032638785635e+290): 0
* [misc]none:  (-2.3832835734274537e-77 -2.0550237535049573e-58 3.3652051120813564e-167): 1
* [misc]none:  (-1.6071108269264857e+240 2.2507296241296892e-278 -8.625502649886978e-116): 1
* [misc]none:  (-7.605291673043568e+86 1.3555181915244097e+58 5.535572593369702e+234): 2
* [misc]none:  (1.1281253812481777e-05 -7.875416682732296e+153 2.953059473116585e-77): 1
* [misc]none:  (-1.7943678282584236e+305 -8.253144371362014e+269 1.6962188327979892e+156): 1
* [misc]none:  (-3.0357430466827192e+202 7.526837789610841e+223 -1.0160940285787676e+119): 1
* [misc]none:  (6.853656747763464e-298 1.5907488733120222e-68 -4.474252265840201e+73): 1
* [misc]none:  (1.3833425279814779e+61 -4.807303049624254e-15 1.8641906072853124e-122): 0
* [misc]none:  (-3.0274687809727364e-300 7.50358512361513e-69 1.5464847509065313e+116): 1
* [misc]none:  (-7.218711869488973e-243 -587327855578134.2 -3.1846212263600816e-18): 1
* [misc]none:  (4.242186305736945e+277 7.288958178428041e-256 5.409384226193089e+76): 1
* [misc]none:  (-2.319372457341872e-287 4.187380162585325e-193 -1.32843112383632e+222): 1
* [misc]none:  (-1.1299275128362188e+120 6.659322155044152e+223 -2.5903554766194963e+287): 0
* [misc]none:  (-7.84381588726745e-44 3.9248553939523704e-204 -2.4810437085982083e-110): 0
* [misc]none:  (2.623583837461381e+148 -4.810065069789271e-38 1.6579472731822137e+209): 1
* [misc]none:  (7.148125858281279e-128 -1.1410424941898917e-307 -7.884101440606108e+43): 1
* [misc]none:  (3.2782900783384907e+260 1.2654023023741973e+87 5.3297020297971135e-251): 3
* [misc]none:  (4.360233270161975e+69 -1.2973858626691246e+248 -1.3038350073216301e+175): 2
* [misc]none:  (6.186245288104366e-177 4.0009214940503626e-296 -3.1670246594447204e-244): 1
* [misc]none:  (-4.944977315465704e+134 3.7946864491882027e-174 7.967379897939584e-266): 1
* [misc]none:  (5.338353252944482e+295 2.475773952907049e-271 5.261531518469373e-290): 1
* [misc]none:  (2.555657911489638e+100 2.1545947154827896e+229 2.6209188754640728e+107): 1
* [misc]none:  (1.0367654190214238e+155 7.510167254913154e-75 -1.879438806525893e-17): 1
* [misc]none:  (-2.2458375637103902e-132 -9.791675790911144e+50 5.462119320563526e+16): 4
* [misc]none:  (-7.461408405072584e-11 2.819362408294866e+247 5.576422555370537e+229): 0
* [misc]none:  (-1.2634592988240547e+184 -2.046312445248254e+167 -2.5768688170454604e-166): 5
* [misc]none:  (-2.3695265370701153e-160 5.627370989949808e+102 -1.1307817728525e-192): 1
* [misc]none:  (2.729599448498006e-142 1.268161462925599e-223 1.8558602765266175e+154): 1
* [misc]none:  (8.010626774664954e-118 3.197294045188449e-213 -3.8061627632242695e+220): 1
* [misc]none:  (1.4601547257514377e-37 6.851358071879168e+277 -1.4026731237337527e+299): 0
* [misc]none:  (1.2309532522175715e-227 5.849070875002102e-168 -1.8322924530722165e+176): 1
* [misc]none:  (2.6481468427206757e-89 1.8304705420573128e+300 5.162437418074754e-216): 1
* [misc]none:  (5.884862647618943e+102 1.3917287586797797e+215 -1.9484215729108895e+208): 2
* [misc]none:  (2.7534373406057187e+274 -6.754823491493555e-24 -2.4266153803656513e-110): 1
* [misc]none:  (2.802805856656922e+299 3267744482859.4893 -2.125403821003621e+259): 1
* [misc]none:  (-5.821161027096475e-49 4.3906960513010925e-288 9.735553079850294e-195): 0
* [misc]none:  (-2.4642361000377723e+179 -223338690.5739434 2.617385806499904e-208): 1
* [misc]none:  (6.454193966659965e-12 1.2843486366644783e+218 1.6598105327534946e+245): 0
* [misc]none:  (-2.2565106546246065e+111 -8.921793657844595e+241 -1.2504926677350782e+286): 0
* [misc]none:  (2142884768423.9766 -1.0342577969053837e-127 1.1325567110922881e-222): 1
* [misc]none:  (6.352964037059704e-48 2.0675888684205106e-37 3.9955309460256863e-193): 0
* [misc]none:  (-6.802352065741283e-237 1.7860466700053246e+179 -2.1540953112813662e-178): 1
* [misc]none:  (-1.1984894069610523e-255 2.286904329311883e+176 -3.0869297245392077e+307): 1
* [misc]none:  (-7.242911167116891e-28 -3.652961257321153e+269 -1.981435962910265e-248): 5
* [misc]none:  (1.434478809327731e-162 1.7673263201240207e+200 4.1358060479750856e+163): 1
* [misc]none:  (2.77377213114978e+181 -2.5233739143143128e-166 7.0699594918945535e-177): 1
* [misc]none:  (1.5437232098269186e+160 -5.1984298768145166e+116 -1.2768311469464077e-95): 1
* [misc]none:  (-4.0802892718556596e+97 -4.502005664483894e-90 -1.3669353810280968e+130): 4
* [misc]none:  (3.5925206879521377e-169 -1.3877894503805502e+162 3.851639943546658e-220): 1
* [misc]none:  (7.262940842293714e+141 2.5169641752150834e-130 -2.4010908942747236e-247): 1
* [misc]none:  (1.5786239562667337e+192 -1.646250865837071e-08 -4.6981533625942616e-48): 1
* [misc]none:  (-1.3666403621362786e-250 1175954691713314.2 1.6505576250215693e+254): 1
* [misc]none:  (-8.454483141733306e+289 3.2999709724191907e-111 -6.317430000587058e+24): 1
* [misc]none:  (-4.671984247068368e+114 -2.9619260441588295e+211 -7.22878673519174e-279): 1
* [misc]none:  (-3.759430214395936e-120 -1.445629235880647e+140 2.1262474173228004e+275): 1
* [misc]none:  (2.0609285567281652e-241 1.9640202737101926e+158 4.0355590295024944e+30): 1
* [misc]none:  (-3.1297081963080297e-242 8.94051254019841e+73 -1.0418876601412776e+158): 1
* [misc]none:  (1.334212127520659e-194 2.3042294780211474e+199 -0.1449571473562267): 1
* [misc]none:  (-1.322393042309631e-287 331.0762921520269 2.486727752761897e+186): 1
* [misc]none:  (6.1692613790114145e-176 3.16347551928874e-213 -1.999009223927216e-112): 1
* [misc]none:  (1.6628640493696272e+86 -1.5025592441357432e-91 1.526533864556896e-136): 0
* [misc]none:  (-1.1590427293178154e-110 2.3621708607435707e+306 -2.12081898299509e-251): 1
* [misc]none:  (-4.444969967255464e-50 -7.309457855467372e+172 -5.496412463214942e+159): 0
* [misc]none:  (-1.4721600470373534e-29 3.795139234164696e-109 9.806701774277626e-103): 0
* [misc]none:  (-3.123985774571585e+305 4.3713778543032466e+80 9.77689775396416e+270): 1
* [misc]none:  (-3.9142022803361806e-187 -5.65740503188699e+260 5.701436151254667e-51): 2
* [misc]none:  (-4.0509904466518765e-37 -6.2678543781187986e-158 2.6870891996869854e+222): 0
* [misc]none:  (1.403842517343178e+239 -4.523272375047282e+19 -3.133147621079016e+299): 1
* [misc]none:  (-3.1263201082196465e-277 4.562606033317646e+142 2.1157410136365666e+27): 1
* [misc]none:  (1.7344997138936077e-42 -3.913559470208424e-83 -2.9867969528063676e+265): 0
* [misc]none:  (3.0173777232564683e+257 1.4365336082533024e-65 7.3222795686052666e+50): 1
* [misc]none:  (-9.290387573799883e-227 2.1939039916199917e-151 6.704445560737266e-185): 1
* [misc]none:  (-9.568307378321542e-67 3.826389705571192e+305 3.2252529629473372e-164): 0
* [misc]none:  (-1.7144787029551547e-76 1945731255459.47 3.4149900413992998e-118): 0
* [misc]none:  (-3.9457481405050707e-140 -3.8831186001124554e+177 3.9566905915205435e+222): 1
* [misc]none:  (-4.045276803805828e+248 2.0407374713985817e-67 6.798712177335776e+112): 1
* [misc]none:  (-1.7506244038659656e+155 -5.551664099930396e+287 1.622208144463601e-166): 1
* [misc]none:  (-8.556050344850203e+96 -7.922576985868201e-83 2.1548182655933656e-147): 0
* [misc]none:  (-1.7889344297298395e-138 8.336613082028674e+83 -5.612374503803972e+191): 1
* [misc]none:  (2.208377572236396e-264 1.625924245506842e+101 3.6974324674576528e-196): 2
* [misc]none:  (1.194352601301008e+170 -1.2990710049317618e+149 -7.565112997028972e+159): 1
* [misc]none:  (1.1658351917668372e+172 1.3349160645071676e+249 2.931040211928409e-256): 1
* [misc]none:  (-2.439121548558237e-263 7.971191617216227e+278 -5.16988167177608e+53): 1
* [misc]none:  (2.6969709464868204e+192 -3.288801652693557e-126 -1.1724467728438874e+62): 1
* [misc]none:  (2.4787821728961726e-208 -4.583226060750687e+286 4.5505475745463453e+70): 1
* [misc]none:  (-4.7627047558420924e-178 9.818158704343799e+98 1.0173157545581e-152): 1
* [misc]none:  (-5.541734639256592e-158 6.582912119010719e-154 -2.7755596952545536e+214): 1
* [misc]none:  (-6.937852684341488e-17 -3.509811603569984e-162 1.0023146616707945e-196): 1
* [misc]none:  (-1.102805383752407e+91 -1.1833316978686804e-196 -2.074828050091204e+43): 1
* [misc]none:  (-1.6730371273659853e+134 7.03833207774333e+15 -1.3239959970038969e+98): 1
* [misc]none:  (4.1286963732031184e-303 -5.2489676640999375e-37 1.37725435443438e-133): 1
* [misc]none:  (2.7744697188841963e+109 -6.937438758466827e-192 -3.3253159094181508e+99): 1
* [misc]none:  (1.3198936947099211e-96 -1.5451834902703197e-42 -1.7726057829102443e-75): 4
* [misc]none:  (2.332651968655402e-142 -1.0504139891547427e+112 1.714387790028798e+53): 1
* [misc]none:  (1.0835466360416472e+257 2.2433259629035416e-110 4.4964231441929855e-212): 1
* [misc]none:  (-1.1740030617157484e-279 -1.2604014885172566e-16 -3.533444382159577e+294): 1
* [misc]none:  (4.163796059008999e+263 9.568517745632325e+214 2.9372247799245325e+93): 1
* [misc]none:  (3.280888101399023e-178 2.4645417753990825e-46 1.1531681692158285e+126): 1
* [misc]none:  (-2.094542504845539e+96 3.658887962688304e-221 -8.114819311899108e-200): 0
* [misc]none:  (-3.106463349287814e-283 -3194.11813336966 3.8921610463731365e-84): 1
* [misc]none:  (-8.851204171241843e+281 -9.262519032529967e-34 -1.785130886221006e+231): 1
* [misc]none:  (5.244418714777191e-247 -1.1047298144911661e-128 -3.806792758567173e-77): 1
* [misc]none:  (8.483535156875368e-302 -1.345613125533753e+279 -1.8508777881935605e+151): 1
* [misc]none:  (-0.0006673038257262197 2.8621091346925045e-294 1.532108192832722e+128): 1
* [misc]none:  (-5.0502610074661083e+207 3.789685423350582e-08 -1.2565837085170136e-39): 1
* [misc]none:  (1.762534146009323e+140 -1.0334310654904308e-302 6.545384967014291e-225): 1
* [misc]none:  (9.107018310586045e+54 -2.971342031183356e+89 -1.6718446752859893e+111): 1
* [misc]none:  (4.918436108504659e-301 -2.0718283319643413e+202 -1.6194758145392415e-55): 1
* [misc]none:  (1.6691081971097037e+94 -7.498270199484197e+128 2.7394548302027227e-88): 0
* [misc]none:  (-3.8474489635359294e+91 3.118009484335783e-104 -5.8304170084179074e-46): 0
* [misc]none:  (-2.67503022703027e-297 -2.5128760687731143e+95 8995869217554.457): 1
* [misc]none:  (-1.9632140373363783e+122 1.2420866124564814e-293 6.3461851602547e-177): 1
* [misc]none:  (-3.432853067516309e-246 2.0914477614867384e-227 2.01314860958205e-179): 1
* [misc]none:  (4.1821161712206335e+98 -1.06513481701701e-107 -4.126212717690705e-129): 0
* [misc]none:  (-6.0258374336189325e+121 1.241885419647938e+111 3.5248326356674874e-60): 1
* [misc]none:  (-185563564389128.0 -3.2505753217846565e-280 -3.802991462899128e-34): 0
* [misc]none:  (2.5937923840174148e+191 2.0634010725481968e+279 -6.71288738518563e+35): 1
* [misc]none:  (-1.3468517163131261e+272 3.7544706354148685e+249 -5.537735150627702e+213): 1
* [misc]none:  (1.740072246435861e-207 1.3636559368742825e-149 1.946944651699716e-139): 1
* [misc]none:  (6.333153678225876e-68 8.70336562916574e-216 7.84549397492709e+169): 0
* [misc]none:  (6363.313367940982 -1.977991260671615e-272 7.762114448443534e+255): 0
* [misc]none:  (1.682179526351612e+60 1.3399459123824423e-08 -2.0088395627297287e+293): 0
* [misc]none:  (-2.0811417072211844e+239 -2.4464470346425223e-307 6.330170018440137e-77): 1
* [misc]none:  (6.04623429007003e-242 -4.345326241698038e-278 5.823432666941199e+232): 1
* [misc]none:  (-3.1969871529936574e+166 3.226368417375545e+273 3.982342803919231e-46): 1
* [misc]none:  (-1.1442254260677068e-38 -1.1682833194119885e+290 1.7119636201650242e-68): 1
* [misc]none:  (5.22304174043592e-158 -3.807000870050907e+58 -1.6925574577510237e+214): 1
* [misc]none:  (8.377477023109926e-106 2.3080855823624493e-299 4.50326449267665e+246): 0
* [misc]none:  (1.0100264902476595e-152 6.2370208452565505e-251 -1.3788511600691207e+143): 1
* [misc]none:  (-9.563665845262864e+134 -4.34857343156037e+281 6.2285928439400495e+156): 2
* [misc]none:  (0.002518103001908201 2.819308104709626e+146 -4.0300440872978227e-184): 0
* [misc]none:  (1.4105181521169557e+85 -2.665217209595492e+188 3.5241094689699846e+143): 2
* [misc]none:  (4.19388438569828e-183 3.636662419716013e-100 -1.2948317804463169e-282): 1
* [misc]none:  (-2.8090151520671207e+163 2.984404923140836e-249 5.437516292888218e-268): 1
* [misc]none:  (5.520248382898629e-230 6.71342285975285e-63 -3.464947738442053e-155): 1
* [misc]none:  (4.004060788521414e+101 5.679811834757315e+283 -6.473810795939257e+164): 1
* [misc]none:  (3.588388254213374e-229 -1139547812.809111 4.890275917515567e-08): 1
* [misc]none:  (-5.005096670380054e+47 -1.1716631781329626e-278 2.3982589341782892e+126): 1
* [misc]none:  (-3.4998489762015864e-219 1.2430204782976187e-178 -1.9903644617661157e-253): 1
* [misc]none:  (-2.385315376938663e+253 1.6672558556111832e-132 -5.52786254698352e+123): 1
* [misc]none:  (-3.3129658515159495e+106 -2.2098708111796672e-198 -2.404284016476968e+279): 0
* [misc]none:  (1.233722688499856e-260 -3.5028343458937535e-90 5.227910927587319e+245): 1
* [misc]none:  (-63767.21419834566 -1.7606249358192524e+273 267950632.53292695): 0
* [misc]none:  (5.624641690736252e-214 8.322805913504859e+214 3.2616756987284277e-94): 2
* [misc]none:  (5.772678079688886e-193 -6.744341629118722e+132 6.954230926244437e-248): 1
* [misc]none:  (-8.888663579267588e+145 -1.2824561231119317e-43 -5.084319674250709e+292): 1
* [misc]none:  (1.2017614084255727e-118 2.163051204570009e+135 -9.483463323409894e+83): 1
* [misc]none:  (1.3207468552144425e-275 1.2439278636891217e+233 1.1524614864139226e-160): 1
* [misc]none:  (1.5181493189729785e-210 2.5055367778394023e+168 161620833577619.34): 1
* [misc]none:  (2.9543484210487e+68 -4.0220565746330086e+125 -1.6011896215578737e-278): 1
* [misc]none:  (-8.84696133260257e-277 1.0241174400059815e-119 -1.279384825639919e+218): 1
* [misc]none:  (-4.0734910927239613e+279 -2.2941123619407014e-42 -1.5101815541228603e-252): 1
* [misc]none:  (4.849304008883996e+136 -1.9158965524986357e+21 -1.0078494497283481e-63): 3
* [misc]none:  (-4.666260546447364e-94 7.089677021982108e+243 5.396180940081133e+274): 0
* [misc]none:  (-1.0374694539724338e-22 3.1474503815022313e+156 2.237363577109642e+74): 5
* [misc]none:  (1.6588937679962464e-112 3.192528639732453e+177 -5.90661572185385e+255): 1
* [misc]none:  (1.1908969294818754e-266 3.099784283699168e-174 -4.3665826438370466e+132): 1
* [misc]none:  (-1.0295936791749538e-299 -2.3878879079615316e+176 -2.7604299366199517e-300): 1
* [misc]none:  (-7.185580883046913e-107 -9.568148082725508e-90 -1.9577524593014605e+255): 0
* [misc]none:  (2.4666697643039057e+135 -9.953058197226308e-231 -1.6523309537219388e+292): 0
* [misc]none:  (1.4077992202573094e+157 -1.6969785717566782e-186 1.2222350343583978e+196): 1
* [misc]none:  (-1.4775843798497103e-226 1.13308848626096e-94 -1.0922245877481088e-202): 1
* [misc]none:  (4.042918419768235e-293 -3.2304680091420593e+273 -1.5418757249344543e-63): 1
* [misc]none:  (-1.5808149525401404e+250 3.027496459540811e+165 -1.2288638190895444e-91): 1
* [misc]none:  (-2.2214116445848722e-125 7.06806421332372e-195 -1.6177284163081556e-296): 1
* [misc]none:  (1.3558740031834803e-64 -9.115550998149062e+67 -4.7657636456813475e+188): 0
* [misc]none:  (6.054739181733751e+60 -3.7471130771905855e-70 -1.652280336936078e-182): 1
* [misc]none:  (-5.086606424901955e-26 -4.150888523033341e+56 2.5369593669384417e-158): 1
* [misc]none:  (4.1567543090652754e-33 -7.628468316635274e+118 -2.1412051815551306e+98): 0
* [misc]none:  (-7.67790351718318e-207 -1.1396663342585698e+185 -1.4047943834222912e+32): 1
* [misc]none:  (1.0167208681953543e+192 1.5933622570633916e-225 -8.205466933650709e-224): 1
* [misc]none:  (1.23513259853389e-199 -2.455637018443649e+26 -5.138936398971843e-75): 2
* [misc]none:  (4.3707194781987494e-97 -2.547315038123042e-87 3.4204094411255474e+115): 0
* [misc]none:  (31.114677989939693 2.800912164521124e-20 -3.2777951328230936e-29): 1
* [misc]none:  (-5.5773404803592965e+259 3.7931337372770976e-299 2.786772086490314e-60): 1
* [misc]none:  (-5.616681094429007e+40 3.096144630304459e-05 -3.1136499993102923e-28): 1
* [misc]none:  (2.1273566438007147e+264 2.075848018336343e+269 -1.6092812022702055e+27): 1
* [misc]none:  (-4.049616931519095e-12 5.231369250464457e+247 -8.701752776315519e+299): 0
* [misc]none:  (1.341667886706771e+115 3.8005266578165216e-258 -1.0098619973673771e+143): 1
* [misc]none:  (2.57846868660545e+128 1.8293764358985593e+179 -3.4049300239591715e+140): 2
* [misc]none:  (-3.2101962723934187e-96 7.417468591127432e+67 -3.877298803162118e-30): 0
* [misc]none:  (-1.8198742460941646e-81 -2.0820068164655182e+40 -7.236742688934569e+286): 0
* [misc]none:  (-8.323040591341415e+218 -4.677922974670643e+80 -6.692473243860769e+126): 1
* [misc]none:  (-1.9106041457506788e-63 3.747520792911468e+127 5.430483387973432e+258): 0
* [misc]none:  (2.2335992870926316e-153 1.4503417141831182e+51 2.0547294018965633e+61): 1
* [misc]none:  (7.852155885222424e-118 -2.8375357663701133e-215 6.513244922065764e-226): 1
* [misc]none:  (7.385144370900328e+173 -5.542636511154422e+167 7.908117764318118e+264): 2
* [misc]none:  (-2.441280553156046e-191 -8.5828334236211e+37 -1.0997158053453796e+52): 1
* [misc]none:  (6.819956828556854e+177 -3.987835231847739e-28 -1.3157971823804226e+26): 1
* [misc]none:  (3.2159945588434616e-06 5.306065123039819 -7.710049967444384e+140): 1
* [misc]none:  (9.03697438609635e-254 5.834916983599053e-288 -3.248874545341504e+57): 1
* [misc]none:  (-4.693794485448123e+266 -1.0182917238227828e-268 7.874050663202412e-138): 1
* [misc]none:  (-2.9961253346398193e-277 -4.2324566784967944e-196 -6.824787913341571e-74): 1
* [misc]none:  (8.573472507341022e+41 -3.1598975960421508e+277 -3.3169741611569367e+305): 0
* [misc]none:  (1.4410801258605738e+62 106537.6777769988 -2.6159166493367154e-235): 0
* [misc]none:  (-2.576894021693856e-173 -4.230280825094585e+83 8.062228390339164e-110): 2
* [misc]none:  (-1.8358840832683498e+44 -2.156801537654526e+36 -3.512703779155646e-87): 0
* [misc]none:  (-6.846939373244303e+227 2.125743593675342e+150 -3.1982664100230636e+83): 1
* [misc]none:  (-6.253340869605864e+291 1.4031893252788157e-130 -2.4878548514423325e+131): 1
* [misc]none:  (4.547656836966103e-26 -9.296466940750938e-169 2.3403140268290895e-220): 1
* [misc]none:  (-5.094827374807951e+22 -3.0047845617322243e+245 3.456521015844278e-267): 0
* [misc]none:  (5.548340076310199e-111 -5.686069957565031e-220 -4.479806301623672e-178): 1
* [misc]none:  (-2.3266982566628708e-73 -4.924557161248151e-49 2.0491433117473444e+251): 0
* [misc]none:  (2.1868710093441635e-94 -2.9110234445746466e+124 4.292734438749543e-07): 1
* [misc]none:  (-1.3160349663332311e-291 -1.0651455859079758e-283 4.626894916535224e-128): 1
* [misc]none:  (1.114170127871121e+259 8.453366577306196e-160 -8.935111048608571e-173): 1
* [misc]none:  (-5.548866558621532e-09 0.0019265340891290363 2.5107596839002617e-188): 1
* [misc]none:  (-2715439348210.3716 3.8364962842018573e-131 -8.310532646005735e-88): 0
* [misc]none:  (9.373070312843732e-91 -1.3476877676941842e+188 -1.1445296297917484e+276): 0
* [misc]none:  (-2.854465274914285e+95 1.5238038259281467e+97 -2.9771655786075137e-170): 0
* [misc]none:  (1.011727234239232e-268 5.76823955439101e-249 -2.0681820259142047e+203): 1
* [misc]none:  (-5.358736018951544e-210 -3.780049011953038e-263 -7.356146101163064e-142): 1
* [misc]none:  (-4.679560768974975e-224 -1.7581458633759795e+76 -2.615425031816684e-28): 1
* [misc]none:  (9.00969948519257e+300 -4.472004514616723e-118 2.4547241600019345e+232): 1
* [misc]none:  (7.022076711242115e-133 -7.904392031638281e+133 -5.94028418794007e+211): 1
* [misc]none:  (-9.328298623753299e+123 -1.0504234320141073e+133 2.943249346534323e+144): 1
* [misc]none:  (-5.6215764598070664e+281 7.885146171822741e-252 4.254787401710164e+249): 1
* [misc]none:  (1.376461838305041e-44 1.1351952620028756e+104 4.887341950722903e-119): 1
* [misc]none:  Picked alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]pick:  Picked  #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2 2)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 2 2 1 2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 2 2 1 2 1 2)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (* 1/2 K)) J))) in 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]backup-simplify:  Simplify (log (/ 1/2 (cos (* 1/2 K)))) into (log (/ 1/2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (/ 1/2 (cos (* 1/2 K))))) into (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (+ (log U) (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))) into (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) into (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) into (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (+ (* (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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log U) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) into (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/2 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))
* [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 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (* 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (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 J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (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 (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 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 (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 J) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 J) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* -2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))) into (* (cos (* 1/2 K)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 0 (* (cos (* 1/2 K)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 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 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 1) (* 0 0)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (* (cos (* 1/2 K)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (- (* 2 (* (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))))) (cos (* 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (* (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))))) (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (* (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))))) (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 (* (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))))) (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ U (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ U (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 (/ U (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (/ U 1) into U
* [misc]backup-simplify:  Simplify (* 1/2 U) into (* 1/2 U)
* [misc]backup-simplify:  Simplify (log (* 1/2 U)) into (log (* 1/2 U))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (log (* 1/2 U)) (- (log J))) into (- (log (* 1/2 U)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 U)) (log J))) into (* 2 (- (log (* 1/2 U)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 U)) (log J)))) into (exp (* 2 (- (log (* 1/2 U)) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))) into (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* U (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 U) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 U)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 U)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) into 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 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (* (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))) 1) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))
* [misc]backup-simplify:  Simplify (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))) into (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))
* [misc]backup-simplify:  Simplify (- (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) into (- (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 U)) (log J)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 U)) (log J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 U)) (log J)) in U
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 U)) in U
* [misc]taylor:  Taking taylor expansion of (* 1/2 U) 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 U in U
* [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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))) into (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))) into (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (- (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into (- (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))))
* [misc]backup-simplify:  Simplify (- (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (- (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))) (* 0 (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (* 0 (* (cos (* 1/2 K)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 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 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (- (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) (* 1 (* 1 J))) into (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) J))
* [misc]approximate:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* -2 1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) into (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) 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)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ 1/2 K)) U))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ 1/2 K)) U)) 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)) U) 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 U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) U) into (* (cos (/ 1/2 K)) U)
* [misc]backup-simplify:  Simplify (/ 1/2 (* (cos (/ 1/2 K)) U)) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ 1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* (cos (/ 1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) into (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) 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)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) 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 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)) in U
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ 1/2 K)) U))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ 1/2 K)) U)) 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 (* (cos (/ 1/2 K)) U) 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 U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (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 (- (/ 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)) 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]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (/ 1/2 (cos (/ 1/2 K))))) into (- (log (/ 1/2 (cos (/ 1/2 K)))) (log U))
* [misc]backup-simplify:  Simplify (+ (- (log (/ 1/2 (cos (/ 1/2 K)))) (log U)) (log J)) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) into (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 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 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)) (* 0 (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))) (* 0 (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 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 (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 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 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 U))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ 1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* (cos (/ 1/2 K)) U))) (* 0 (/ 0 (* (cos (/ 1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow J 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow J 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (* (cos (/ 1/2 (/ 1 K))) (sqrt (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1)))) (* 1 (* 1 (/ 1 (/ 1 J))))) into (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))
* [misc]approximate:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* -2 -1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) into (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) 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 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ -1/2 K)) U))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ -1/2 K)) U)) 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)) U) 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 U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) U) into (* (cos (/ -1/2 K)) U)
* [misc]backup-simplify:  Simplify (/ 1/2 (* (cos (/ -1/2 K)) U)) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ -1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) into (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) 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 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)) in U
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ -1/2 K)) U))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ -1/2 K)) U)) 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 (* (cos (/ -1/2 K)) U) 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 U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (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 (- (/ 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)) 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]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (/ 1/2 (cos (/ -1/2 K))))) into (- (log (/ 1/2 (cos (/ -1/2 K)))) (log U))
* [misc]backup-simplify:  Simplify (+ (- (log (/ 1/2 (cos (/ -1/2 K)))) (log U)) (log J)) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) into (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- 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 (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))) (* 0 (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 U))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ -1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* (cos (/ -1/2 K)) U))) (* 0 (/ 0 (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow J 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow J 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (* (cos (/ -1/2 (/ 1 (- K)))) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1)))) (* 1 (* 1 (/ 1 (/ 1 (- J)))))) into (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))) (* (cos (* 1/2 K)) J)))
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 2 2 1 2)
* [misc]approximate:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (* 1/2 K)) J))) in 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]backup-simplify:  Simplify (log (/ 1/2 (cos (* 1/2 K)))) into (log (/ 1/2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (/ 1/2 (cos (* 1/2 K))))) into (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (+ (log U) (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))) into (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) into (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log U) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (+ (* (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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (* 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]approximate:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (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 J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) into (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))
* [misc]approximate:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (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 (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) into (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 2 2 1 2 1 2)
* [misc]approximate:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 2 (* 1 J)) into (* 2 J)
* [misc]approximate:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ 1/2 (/ 1 K)))) (* 1 (/ 1 (/ 1 J)))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (/ 1 (/ 1 (- J))))) into (* 2 (* (cos (* 1/2 K)) J))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2))))>
* * * * [misc]progress:  [ 2 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1))))>
* * * * [misc]progress:  [ 3 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 4 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 5 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 6 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (55 enodes)
* * [misc]simplify:  iters left: 3 (131 enodes)
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 7 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 8 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 9 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (101 enodes)
* * [misc]simplify:  iters left: 2 (324 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 10 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (202 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [enter]simplify:  Simplifying (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (90 enodes)
* * [misc]simplify:  iters left: 3 (337 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 11 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (187 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [enter]simplify:  Simplifying (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (127 enodes)
* * [misc]simplify:  iters left: 2 (484 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 12 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 13 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 14 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 15 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) 1))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 16 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) 1))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 17 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) 1))>
* * * * [misc]progress:  [ 18 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (log (* -2 J)) (+ (log (cos (/ K 2))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (+ (log (* -2 J)) (+ (log (cos (/ K 2))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (69 enodes)
* * [misc]simplify:  iters left: 3 (156 enodes)
* * [misc]simplify:  iters left: 2 (400 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (+ (log (cos (/ K 2))) (log (* J -2))))
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (+ (log (cos (/ K 2))) (log (* J -2))))
* * * * [misc]progress:  [ 19 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (log (* -2 J)) (log (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (+ (log (* -2 J)) (log (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (66 enodes)
* * [misc]simplify:  iters left: 3 (151 enodes)
* * [misc]simplify:  iters left: 2 (390 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (+ (log (* J -2)) (log (cos (/ K 2)))))
* [exit]simplify:  Simplified to (+ (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (+ (log (* J -2)) (log (cos (/ K 2)))))
* * * * [misc]progress:  [ 20 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (log (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (log (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (83 enodes)
* * [misc]simplify:  iters left: 3 (198 enodes)
* * [misc]simplify:  iters left: 2 (481 enodes)
* [exit]simplify:  Simplified to (log (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (log (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 21 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (log (exp (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (exp (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (77 enodes)
* * [misc]simplify:  iters left: 3 (161 enodes)
* * [misc]simplify:  iters left: 2 (393 enodes)
* [exit]simplify:  Simplified to (exp (* (sqrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (exp (* (sqrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 22 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (53 enodes)
* * [misc]simplify:  iters left: 4 (181 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 23 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (150 enodes)
* [exit]simplify:  Simplified to (* (* (* (* J -2) (cos (/ K 2))) (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (* (* J -2) (* J -2)) (* (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) (* (cos (/ K 2)) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (* (* (* J -2) (cos (/ K 2))) (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (* (* J -2) (* J -2)) (* (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) (* (cos (/ K 2)) (cos (/ K 2))))))
* * * * [misc]progress:  [ 24 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (cbrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (72 enodes)
* * [misc]simplify:  iters left: 3 (156 enodes)
* * [misc]simplify:  iters left: 2 (391 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2))))) (cbrt (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (cbrt (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2))))) (cbrt (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (cbrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (35 enodes)
* * [misc]simplify:  iters left: 4 (71 enodes)
* * [misc]simplify:  iters left: 3 (156 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (cbrt (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (cbrt (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 25 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (43 enodes)
* * [misc]simplify:  iters left: 4 (127 enodes)
* [exit]simplify:  Simplified to (pow (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))) 3)
* [exit]simplify:  Simplified to (pow (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))) 3)
* * * * [misc]progress:  [ 26 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (sqrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (35 enodes)
* * [misc]simplify:  iters left: 4 (71 enodes)
* * [misc]simplify:  iters left: 3 (156 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (sqrt (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))))
* [enter]simplify:  Simplifying (sqrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (35 enodes)
* * [misc]simplify:  iters left: 4 (71 enodes)
* * [misc]simplify:  iters left: 3 (156 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (sqrt (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (* J -2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 27 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* 1 (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 28 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (* (* -2 J) (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (8 enodes)
* * [misc]simplify:  iters left: 4 (12 enodes)
* * [misc]simplify:  iters left: 3 (18 enodes)
* * [misc]simplify:  iters left: 2 (19 enodes)
* [exit]simplify:  Simplified to (* (* J -2) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (* J -2) (cos (/ K 2)))
* * * * [misc]progress:  [ 29 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* -2 (* J (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* J (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (28 enodes)
* * [misc]simplify:  iters left: 4 (51 enodes)
* * [misc]simplify:  iters left: 3 (113 enodes)
* * [misc]simplify:  iters left: 2 (338 enodes)
* [exit]simplify:  Simplified to (* (* J (cos (/ K 2))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (* J (cos (/ K 2))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 30 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (88 enodes)
* * [misc]simplify:  iters left: 3 (259 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ 1 (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3)))))
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ 1 (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3)))))
* * * * [misc]progress:  [ 31 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (81 enodes)
* * [misc]simplify:  iters left: 3 (244 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* * * * [misc]progress:  [ 32 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* -2 J)))>
* * * * [misc]progress:  [ 33 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2)))))))>
* [enter]simplify:  Simplifying (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (40 enodes)
* * [misc]simplify:  iters left: 3 (69 enodes)
* * [misc]simplify:  iters left: 2 (134 enodes)
* * [misc]simplify:  iters left: 1 (296 enodes)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* * * * [misc]progress:  [ 34 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2)))))))>
* [enter]simplify:  Simplifying (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (40 enodes)
* * [misc]simplify:  iters left: 3 (69 enodes)
* * [misc]simplify:  iters left: 2 (134 enodes)
* * [misc]simplify:  iters left: 1 (296 enodes)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* * * * [misc]progress:  [ 35 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) (* 1 2)))))))>
* [enter]simplify:  Simplifying (* 1 2)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to 2
* [exit]simplify:  Simplified to 2
* * * * [misc]progress:  [ 36 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (pow (* (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) (cbrt (/ U (* (* 2 J) (cos (/ K 2)))))) 2) (pow (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)))))))>
* [enter]simplify:  Simplifying (pow (* (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) (cbrt (/ U (* (* 2 J) (cos (/ K 2)))))) 2)
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (39 enodes)
* * [misc]simplify:  iters left: 1 (58 enodes)
* [exit]simplify:  Simplified to (* (/ (/ U (* J 2)) (cos (/ K 2))) (cbrt (/ (/ U (* J 2)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (/ (/ U (* J 2)) (cos (/ K 2))) (cbrt (/ (/ U (* J 2)) (cos (/ K 2)))))
* [enter]simplify:  Simplifying (pow (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (29 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)))))
* * * * [misc]progress:  [ 37 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2) (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)))))))>
* [enter]simplify:  Simplifying (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (40 enodes)
* * [misc]simplify:  iters left: 1 (46 enodes)
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* [enter]simplify:  Simplifying (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (40 enodes)
* * [misc]simplify:  iters left: 1 (46 enodes)
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* * * * [misc]progress:  [ 38 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (pow 1 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (pow 1 2)
* * [misc]simplify:  iters left: 1 (3 enodes)
* [exit]simplify:  Simplified to 1
* [exit]simplify:  Simplified to 1
* [enter]simplify:  Simplifying (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (17 enodes)
* * [misc]simplify:  iters left: 4 (35 enodes)
* * [misc]simplify:  iters left: 3 (95 enodes)
* * [misc]simplify:  iters left: 2 (318 enodes)
* [exit]simplify:  Simplified to (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))
* * * * [misc]progress:  [ 39 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (pow U 2) (pow (/ 1 (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (pow U 2)
* * [misc]simplify:  iters left: 1 (3 enodes)
* [exit]simplify:  Simplified to (* U U)
* [exit]simplify:  Simplified to (* U U)
* [enter]simplify:  Simplifying (pow (/ 1 (* (* 2 J) (cos (/ K 2)))) 2)
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (37 enodes)
* * [misc]simplify:  iters left: 3 (88 enodes)
* * [misc]simplify:  iters left: 2 (299 enodes)
* [exit]simplify:  Simplified to (* (/ (/ 1 (* J 2)) (cos (/ K 2))) (/ (/ 1 (* J 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (/ (/ 1 (* J 2)) (cos (/ K 2))) (/ (/ 1 (* J 2)) (cos (/ K 2))))
* * * * [misc]progress:  [ 40 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (/ U (* (* 2 J) (cos (/ K 2)))) (/ U (* (* 2 J) (cos (/ K 2))))))))))>
* * * * [misc]progress:  [ 41 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 1))))))>
* * * * [misc]progress:  [ 42 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (log (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (log (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (143 enodes)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* [exit]simplify:  Simplified to (* (log (/ (/ U (* J 2)) (cos (/ K 2)))) 2)
* * * * [misc]progress:  [ 43 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (log (exp (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (exp (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (38 enodes)
* * [misc]simplify:  iters left: 3 (98 enodes)
* * [misc]simplify:  iters left: 2 (321 enodes)
* [exit]simplify:  Simplified to (exp (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (exp (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 44 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (* (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (37 enodes)
* * [misc]simplify:  iters left: 3 (98 enodes)
* * [misc]simplify:  iters left: 2 (321 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))) (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))) (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (36 enodes)
* * [misc]simplify:  iters left: 3 (97 enodes)
* * [misc]simplify:  iters left: 2 (320 enodes)
* [exit]simplify:  Simplified to (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (cbrt (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 45 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (cbrt (* (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (191 enodes)
* [exit]simplify:  Simplified to (pow (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 3)
* [exit]simplify:  Simplified to (pow (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 3)
* * * * [misc]progress:  [ 46 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (37 enodes)
* * [misc]simplify:  iters left: 3 (97 enodes)
* * [misc]simplify:  iters left: 2 (324 enodes)
* [exit]simplify:  Simplified to (fabs (/ (/ U (* J 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (fabs (/ (/ U (* J 2)) (cos (/ K 2))))
* [enter]simplify:  Simplifying (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (37 enodes)
* * [misc]simplify:  iters left: 3 (97 enodes)
* * [misc]simplify:  iters left: 2 (324 enodes)
* [exit]simplify:  Simplified to (fabs (/ (/ U (* J 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (fabs (/ (/ U (* J 2)) (cos (/ K 2))))
* * * * [misc]progress:  [ 47 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 48 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (pow (* (* 2 J) (cos (/ K 2))) 1)) 2))))))>
* [enter]simplify:  Simplifying (* (* 2 J) (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (7 enodes)
* * [misc]simplify:  iters left: 4 (11 enodes)
* * [misc]simplify:  iters left: 3 (17 enodes)
* * [misc]simplify:  iters left: 2 (18 enodes)
* [exit]simplify:  Simplified to (* (* J 2) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (* J 2) (cos (/ K 2)))
* * * * [misc]progress:  [ 49 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (pow (* (* 2 J) (cos (/ K 2))) 1)) 2))))))>
* * * * [misc]progress:  [ 50 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (exp (+ (log (* 2 J)) (log (cos (/ K 2)))))) 2))))))>
* [enter]simplify:  Simplifying (+ (log (* 2 J)) (log (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (14 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (24 enodes)
* [exit]simplify:  Simplified to (+ (log (* J 2)) (log (cos (/ K 2))))
* [exit]simplify:  Simplified to (+ (log (* J 2)) (log (cos (/ K 2))))
* * * * [misc]progress:  [ 51 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (exp (log (* (* 2 J) (cos (/ K 2)))))) 2))))))>
* [enter]simplify:  Simplifying (log (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (26 enodes)
* * [misc]simplify:  iters left: 3 (44 enodes)
* [exit]simplify:  Simplified to (log (* (* J 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (log (* (* J 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 52 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (log (exp (* (* 2 J) (cos (/ K 2)))))) 2))))))>
* [enter]simplify:  Simplifying (exp (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (14 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (31 enodes)
* * [misc]simplify:  iters left: 2 (42 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (pow (exp (+ J J)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (pow (exp (+ J J)) (cos (/ K 2)))
* * * * [misc]progress:  [ 53 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (cbrt (* (* (* (* 2 J) (* 2 J)) (* 2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (* 2 J) (* 2 J)) (* 2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (77 enodes)
* * [misc]simplify:  iters left: 3 (243 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (pow (* J 2) 3)) (* (cos (/ K 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (pow (* J 2) 3)) (* (cos (/ K 2)) (cos (/ K 2))))
* * * * [misc]progress:  [ 54 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* (cbrt (* (* 2 J) (cos (/ K 2)))) (cbrt (* (* 2 J) (cos (/ K 2))))) (cbrt (* (* 2 J) (cos (/ K 2)))))) 2))))))>
* [enter]simplify:  Simplifying (* (cbrt (* (* 2 J) (cos (/ K 2)))) (cbrt (* (* 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 (20 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (* J 2) (cos (/ K 2)))) (cbrt (* (* J 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (cbrt (* (* J 2) (cos (/ K 2)))) (cbrt (* (* J 2) (cos (/ K 2)))))
* [enter]simplify:  Simplifying (cbrt (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (18 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (cbrt (* (* J 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (cbrt (* (* J 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 55 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (cbrt (* (* (* (* 2 J) (cos (/ K 2))) (* (* 2 J) (cos (/ K 2)))) (* (* 2 J) (cos (/ K 2)))))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (* 2 J) (cos (/ K 2))) (* (* 2 J) (cos (/ K 2)))) (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (55 enodes)
* * [misc]simplify:  iters left: 3 (168 enodes)
* [exit]simplify:  Simplified to (pow (* (* J 2) (cos (/ K 2))) 3)
* [exit]simplify:  Simplified to (pow (* (* J 2) (cos (/ K 2))) 3)
* * * * [misc]progress:  [ 56 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (sqrt (* (* 2 J) (cos (/ K 2)))) (sqrt (* (* 2 J) (cos (/ K 2)))))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (18 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* J 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (sqrt (* (* J 2) (cos (/ K 2))))
* [enter]simplify:  Simplifying (sqrt (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (18 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* J 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (sqrt (* (* J 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 57 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 1 (* (* 2 J) (cos (/ K 2))))) 2))))))>
* * * * [misc]progress:  [ 58 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (* (* 2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (38 enodes)
* * [misc]simplify:  iters left: 2 (42 enodes)
* [exit]simplify:  Simplified to (* (* 2 (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) J))
* [exit]simplify:  Simplified to (* (* 2 (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) J))
* * * * [misc]progress:  [ 59 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (* (* 2 J) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (18 enodes)
* * [misc]simplify:  iters left: 3 (19 enodes)
* [exit]simplify:  Simplified to (* (* J 2) (sqrt (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (* J 2) (sqrt (cos (/ K 2))))
* * * * [misc]progress:  [ 60 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) 1) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* 2 J) 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 (* J 2)
* [exit]simplify:  Simplified to (* J 2)
* * * * [misc]progress:  [ 61 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 (* J (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (* J (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (6 enodes)
* * [misc]simplify:  iters left: 4 (7 enodes)
* [exit]simplify:  Simplified to (* J (cos (/ K 2)))
* [exit]simplify:  Simplified to (* J (cos (/ K 2)))
* * * * [misc]progress:  [ 62 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (cos (/ K 2)) (* 2 J))) 2))))))>
* * * * [misc]progress:  [ 63 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (80 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (281 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ 1 (* (* (/ U J) 1/2) (* (/ U J) 1/2)))))
* * * * [misc]progress:  [ 64 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))
* * [misc]simplify:  iters left: 6 (26 enodes)
* * [misc]simplify:  iters left: 5 (55 enodes)
* * [misc]simplify:  iters left: 4 (118 enodes)
* * [misc]simplify:  iters left: 3 (337 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (* (* (/ 1 J) U) (/ 1/2 (cos (* 1/2 K)))) (* (* (/ 1 J) U) (/ 1/2 (cos (* 1/2 K))))) 1)) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 65 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))))))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))))
* * [misc]simplify:  iters left: 6 (27 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (117 enodes)
* * [misc]simplify:  iters left: 3 (335 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* K 1/2)))) (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* K 1/2))))) 1)) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 66 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) J)))>
* [enter]simplify:  Simplifying (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) J))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (118 enodes)
* * [misc]simplify:  iters left: 2 (223 enodes)
* [exit]simplify:  Simplified to (* (* -2 J) (sqrt (+ (* (* U (/ 1/2 J)) (* U (/ 1/2 J))) 1)))
* * * * [misc]progress:  [ 67 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))))>
* [enter]simplify:  Simplifying (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))
* * [misc]simplify:  iters left: 6 (24 enodes)
* * [misc]simplify:  iters left: 5 (53 enodes)
* * [misc]simplify:  iters left: 4 (116 enodes)
* * [misc]simplify:  iters left: 3 (333 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (* (/ 1/2 (cos (* K 1/2))) (* U (/ 1 J))) (* (/ 1/2 (cos (* K 1/2))) (* U (/ 1 J)))) 1)) (* (* J -2) (cos (* K 1/2))))
* * * * [misc]progress:  [ 68 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))) (* (cos (* 1/2 K)) J))))>
* [enter]simplify:  Simplifying (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))) (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (116 enodes)
* * [misc]simplify:  iters left: 3 (331 enodes)
* [exit]simplify:  Simplified to (* (* (cos (* K 1/2)) (* -2 J)) (sqrt (+ 1 (* (* (/ 1/2 (cos (* K 1/2))) (/ (/ -1 J) (/ -1 U))) (* (/ 1/2 (cos (* K 1/2))) (/ (/ -1 J) (/ -1 U)))))))
* * * * [misc]progress:  [ 69 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (80 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (281 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ 1 (* (* 1/2 (/ U J)) (* 1/2 (/ U J))))))
* * * * [misc]progress:  [ 70 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))
* * [misc]simplify:  iters left: 6 (26 enodes)
* * [misc]simplify:  iters left: 5 (55 enodes)
* * [misc]simplify:  iters left: 4 (118 enodes)
* * [misc]simplify:  iters left: 3 (337 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (* (* (/ 1 J) U) (/ 1/2 (cos (* 1/2 K)))) (* (* (/ 1 J) U) (/ 1/2 (cos (* 1/2 K))))) 1)) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 71 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))))))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))))
* * [misc]simplify:  iters left: 6 (27 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (117 enodes)
* * [misc]simplify:  iters left: 3 (335 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* K 1/2)))) (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* K 1/2))))) 1)) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 72 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 J)) 2))))))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 J)) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (57 enodes)
* * [misc]simplify:  iters left: 3 (107 enodes)
* * [misc]simplify:  iters left: 2 (180 enodes)
* * [misc]simplify:  iters left: 1 (257 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ U J) 2) (/ (/ U J) 2)) 1)))
* * * * [misc]progress:  [ 73 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 (* (cos (* 1/2 K)) J))) 2))))))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 (* (cos (* 1/2 K)) J))) 2)))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (71 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (404 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (/ (/ (/ (* U U) (* J 2)) (cos (* 1/2 K))) (* (cos (* 1/2 K)) (* J 2))) 1)))
* * * * [misc]progress:  [ 74 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 (* (cos (* 1/2 K)) J))) 2))))))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 (* (cos (* 1/2 K)) J))) 2)))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (71 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (404 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (/ (/ (/ (* U U) (* J 2)) (cos (* 1/2 K))) (* (cos (* 1/2 K)) (* J 2))) 1)))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 3 / 4
* * * [misc]progress:  picking best candidate
* [misc]none:  Fresh alts: 4
* [misc]none:  All alts: 4
* [misc]none:  Non-fresh alt: (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* [misc]none:  Non-fresh alt: (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* [misc]none:  Fresh alt: (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* [misc]none:  Fresh alt: (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* [misc]none:  Fresh alt: (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* [misc]none:  Fresh alt: (λ (J K U) (cbrt (* (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))))
* [misc]none:  Fresh alt indexes
* [misc]none:  (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 0
* [misc]none:  (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 1
* [misc]none:  (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 2
* [misc]none:  (λ (J K U) (cbrt (* (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))): 3
* [misc]none:  Best fresh alt per point
* [misc]none:  (1.8269212298308998e+214 1789977963981.046 -1.7899154283931006e-62): 1
* [misc]none:  (1.6281717766697912e+39 3.5243641367880456e+86 -3.0008256032154172e-176): 1
* [misc]none:  (-7.986330642950897e-117 1.1611754700502491e-55 8.728226238434233e-64): 1
* [misc]none:  (-1.6133455999823373e+110 -3.9890484917100117e+257 -1.5117832743647305e-21): 1
* [misc]none:  (3.928924306566786e-70 5.222760300460367e-180 -4.026134204708055e+160): 0
* [misc]none:  (2.281413649637054e-166 4.156243175149629e-181 -9.231874857928986e-255): 1
* [misc]none:  (-1.65054043818576e-39 -1.0058709145515093e+290 -4.753699147196455e-118): 0
* [misc]none:  (-4.805584106456354e-282 -0.15058815983267834 3.714800492587865e+85): 0
* [misc]none:  (-4.7089063680709754e+260 4.344802098601123e-298 4.508329239962989e+257): 0
* [misc]none:  (-1.211264682641895e-292 1.0495684746531957e+167 2.721003254105153e-81): 0
* [misc]none:  (-3.0671153252781823e-63 -7.74362334743424e+32 -2.2376851712564295e-118): 1
* [misc]none:  (1.64239269831532e+149 -1.576948173228613e+33 9.680698928511806e-32): 0
* [misc]none:  (1.954959341132994e-252 -7.83347153590065e-06 5.521334390623478e-06): 0
* [misc]none:  (-3.229654932887624e+201 -9.827696191097834e-18 -1.3343140776153144e-304): 1
* [misc]none:  (-9.906575581428813e+195 7.10957194421701e+200 -4.7756557550151386e+160): 1
* [misc]none:  (2.4256946179069016e+78 6.207394963032113e+30 -7.218692088264328e+54): 1
* [misc]none:  (8.781920275794267e+61 3.5618749791650757e+87 4.9372470656494625e-201): 1
* [misc]none:  (1.4446355009900792e+23 -3.5082856951249954e-122 9.917487178181935e-54): 1
* [misc]none:  (-7.01049497494046e-138 3.841494064694043e+276 3.642806409692576e+70): 0
* [misc]none:  (-3.326243684234595e+241 -7.587678445119084e+247 1.518078533135906e+61): 0
* [misc]none:  (1.5052438492777668e+214 1.5460201380138582e-108 6.354924490516637e-174): 1
* [misc]none:  (1.1935837539207151e+36 -1.6901036379481523e+68 5.558607723763576e+296): 0
* [misc]none:  (-5129.844514220037 -8.518839978003416e+199 5.0618502549145104e+216): 0
* [misc]none:  (-2.0899529309308688e-173 -1.3078423091955545e+95 8.726419779901594e-156): 1
* [misc]none:  (1.5484790382727637e+258 2.2758369496030736e+44 2.7646272679971947e+138): 1
* [misc]none:  (1.8029164814151534e-305 -8.140052952226443e-29 -3.868827374468717e+273): 0
* [misc]none:  (-9.30868828487235e-242 7.865810923274834e+251 -1.977339157633397e-22): 0
* [misc]none:  (-12396.634829186376 2.0737883409435182e-60 8.938208620266642e-81): 1
* [misc]none:  (-1.0125994980022202e+121 9.949795070357293e-13 3.9753155304068916e+192): 0
* [misc]none:  (-1.5751944823937151e-208 -5.711690539427335e-292 2.0698086438592394e+99): 0
* [misc]none:  (8.149794087375897e+77 1.4399038101240658e-157 -0.0033935472374883513): 1
* [misc]none:  (-1.873060887288803e+204 6.486236446634097e-143 -6.777569686362558e+23): 1
* [misc]none:  (-3.976258322985434e+241 1.0713666056080785e-84 -1.4481584190101499e-109): 0
* [misc]none:  (1.8890847145741933e+54 5.334416108525731e+103 8.243928876632343e+120): 1
* [misc]none:  (4.915746009665795e+153 -1.2716911445748643e-294 -1.178199525484178e+291): 1
* [misc]none:  (-2.616452914461827e+123 -1.3552545859518693e-149 1.0769411808120101e+237): 2
* [misc]none:  (2.7212207505395135e+138 -1.7192030807828345e+260 -3.070590530502344e+254): 0
* [misc]none:  (4.3361011341035273e+108 -7.078347720981057e+296 -1.1633032638785635e+290): 0
* [misc]none:  (-2.3832835734274537e-77 -2.0550237535049573e-58 3.3652051120813564e-167): 1
* [misc]none:  (-1.6071108269264857e+240 2.2507296241296892e-278 -8.625502649886978e-116): 1
* [misc]none:  (-7.605291673043568e+86 1.3555181915244097e+58 5.535572593369702e+234): 1
* [misc]none:  (1.1281253812481777e-05 -7.875416682732296e+153 2.953059473116585e-77): 1
* [misc]none:  (-1.7943678282584236e+305 -8.253144371362014e+269 1.6962188327979892e+156): 1
* [misc]none:  (-3.0357430466827192e+202 7.526837789610841e+223 -1.0160940285787676e+119): 1
* [misc]none:  (6.853656747763464e-298 1.5907488733120222e-68 -4.474252265840201e+73): 0
* [misc]none:  (1.3833425279814779e+61 -4.807303049624254e-15 1.8641906072853124e-122): 0
* [misc]none:  (-3.0274687809727364e-300 7.50358512361513e-69 1.5464847509065313e+116): 0
* [misc]none:  (-7.218711869488973e-243 -587327855578134.2 -3.1846212263600816e-18): 0
* [misc]none:  (4.242186305736945e+277 7.288958178428041e-256 5.409384226193089e+76): 1
* [misc]none:  (-2.319372457341872e-287 4.187380162585325e-193 -1.32843112383632e+222): 0
* [misc]none:  (-1.1299275128362188e+120 6.659322155044152e+223 -2.5903554766194963e+287): 0
* [misc]none:  (-7.84381588726745e-44 3.9248553939523704e-204 -2.4810437085982083e-110): 1
* [misc]none:  (2.623583837461381e+148 -4.810065069789271e-38 1.6579472731822137e+209): 1
* [misc]none:  (7.148125858281279e-128 -1.1410424941898917e-307 -7.884101440606108e+43): 0
* [misc]none:  (3.2782900783384907e+260 1.2654023023741973e+87 5.3297020297971135e-251): 0
* [misc]none:  (4.360233270161975e+69 -1.2973858626691246e+248 -1.3038350073216301e+175): 2
* [misc]none:  (6.186245288104366e-177 4.0009214940503626e-296 -3.1670246594447204e-244): 1
* [misc]none:  (-4.944977315465704e+134 3.7946864491882027e-174 7.967379897939584e-266): 1
* [misc]none:  (5.338353252944482e+295 2.475773952907049e-271 5.261531518469373e-290): 0
* [misc]none:  (2.555657911489638e+100 2.1545947154827896e+229 2.6209188754640728e+107): 1
* [misc]none:  (1.0367654190214238e+155 7.510167254913154e-75 -1.879438806525893e-17): 1
* [misc]none:  (-2.2458375637103902e-132 -9.791675790911144e+50 5.462119320563526e+16): 1
* [misc]none:  (-7.461408405072584e-11 2.819362408294866e+247 5.576422555370537e+229): 0
* [misc]none:  (-1.2634592988240547e+184 -2.046312445248254e+167 -2.5768688170454604e-166): 2
* [misc]none:  (-2.3695265370701153e-160 5.627370989949808e+102 -1.1307817728525e-192): 1
* [misc]none:  (2.729599448498006e-142 1.268161462925599e-223 1.8558602765266175e+154): 0
* [misc]none:  (8.010626774664954e-118 3.197294045188449e-213 -3.8061627632242695e+220): 0
* [misc]none:  (1.4601547257514377e-37 6.851358071879168e+277 -1.4026731237337527e+299): 0
* [misc]none:  (1.2309532522175715e-227 5.849070875002102e-168 -1.8322924530722165e+176): 0
* [misc]none:  (2.6481468427206757e-89 1.8304705420573128e+300 5.162437418074754e-216): 1
* [misc]none:  (5.884862647618943e+102 1.3917287586797797e+215 -1.9484215729108895e+208): 0
* [misc]none:  (2.7534373406057187e+274 -6.754823491493555e-24 -2.4266153803656513e-110): 1
* [misc]none:  (2.802805856656922e+299 3267744482859.4893 -2.125403821003621e+259): 1
* [misc]none:  (-5.821161027096475e-49 4.3906960513010925e-288 9.735553079850294e-195): 1
* [misc]none:  (-2.4642361000377723e+179 -223338690.5739434 2.617385806499904e-208): 1
* [misc]none:  (6.454193966659965e-12 1.2843486366644783e+218 1.6598105327534946e+245): 0
* [misc]none:  (-2.2565106546246065e+111 -8.921793657844595e+241 -1.2504926677350782e+286): 0
* [misc]none:  (2142884768423.9766 -1.0342577969053837e-127 1.1325567110922881e-222): 0
* [misc]none:  (6.352964037059704e-48 2.0675888684205106e-37 3.9955309460256863e-193): 1
* [misc]none:  (-6.802352065741283e-237 1.7860466700053246e+179 -2.1540953112813662e-178): 1
* [misc]none:  (-1.1984894069610523e-255 2.286904329311883e+176 -3.0869297245392077e+307): 0
* [misc]none:  (-7.242911167116891e-28 -3.652961257321153e+269 -1.981435962910265e-248): 2
* [misc]none:  (1.434478809327731e-162 1.7673263201240207e+200 4.1358060479750856e+163): 0
* [misc]none:  (2.77377213114978e+181 -2.5233739143143128e-166 7.0699594918945535e-177): 1
* [misc]none:  (1.5437232098269186e+160 -5.1984298768145166e+116 -1.2768311469464077e-95): 1
* [misc]none:  (-4.0802892718556596e+97 -4.502005664483894e-90 -1.3669353810280968e+130): 1
* [misc]none:  (3.5925206879521377e-169 -1.3877894503805502e+162 3.851639943546658e-220): 1
* [misc]none:  (7.262940842293714e+141 2.5169641752150834e-130 -2.4010908942747236e-247): 1
* [misc]none:  (1.5786239562667337e+192 -1.646250865837071e-08 -4.6981533625942616e-48): 1
* [misc]none:  (-1.3666403621362786e-250 1175954691713314.2 1.6505576250215693e+254): 0
* [misc]none:  (-8.454483141733306e+289 3.2999709724191907e-111 -6.317430000587058e+24): 1
* [misc]none:  (-4.671984247068368e+114 -2.9619260441588295e+211 -7.22878673519174e-279): 1
* [misc]none:  (-3.759430214395936e-120 -1.445629235880647e+140 2.1262474173228004e+275): 0
* [misc]none:  (2.0609285567281652e-241 1.9640202737101926e+158 4.0355590295024944e+30): 0
* [misc]none:  (-3.1297081963080297e-242 8.94051254019841e+73 -1.0418876601412776e+158): 0
* [misc]none:  (1.334212127520659e-194 2.3042294780211474e+199 -0.1449571473562267): 0
* [misc]none:  (-1.322393042309631e-287 331.0762921520269 2.486727752761897e+186): 0
* [misc]none:  (6.1692613790114145e-176 3.16347551928874e-213 -1.999009223927216e-112): 1
* [misc]none:  (1.6628640493696272e+86 -1.5025592441357432e-91 1.526533864556896e-136): 0
* [misc]none:  (-1.1590427293178154e-110 2.3621708607435707e+306 -2.12081898299509e-251): 1
* [misc]none:  (-4.444969967255464e-50 -7.309457855467372e+172 -5.496412463214942e+159): 0
* [misc]none:  (-1.4721600470373534e-29 3.795139234164696e-109 9.806701774277626e-103): 0
* [misc]none:  (-3.123985774571585e+305 4.3713778543032466e+80 9.77689775396416e+270): 0
* [misc]none:  (-3.9142022803361806e-187 -5.65740503188699e+260 5.701436151254667e-51): 0
* [misc]none:  (-4.0509904466518765e-37 -6.2678543781187986e-158 2.6870891996869854e+222): 0
* [misc]none:  (1.403842517343178e+239 -4.523272375047282e+19 -3.133147621079016e+299): 0
* [misc]none:  (-3.1263201082196465e-277 4.562606033317646e+142 2.1157410136365666e+27): 0
* [misc]none:  (1.7344997138936077e-42 -3.913559470208424e-83 -2.9867969528063676e+265): 0
* [misc]none:  (3.0173777232564683e+257 1.4365336082533024e-65 7.3222795686052666e+50): 1
* [misc]none:  (-9.290387573799883e-227 2.1939039916199917e-151 6.704445560737266e-185): 1
* [misc]none:  (-9.568307378321542e-67 3.826389705571192e+305 3.2252529629473372e-164): 1
* [misc]none:  (-1.7144787029551547e-76 1945731255459.47 3.4149900413992998e-118): 1
* [misc]none:  (-3.9457481405050707e-140 -3.8831186001124554e+177 3.9566905915205435e+222): 0
* [misc]none:  (-4.045276803805828e+248 2.0407374713985817e-67 6.798712177335776e+112): 1
* [misc]none:  (-1.7506244038659656e+155 -5.551664099930396e+287 1.622208144463601e-166): 0
* [misc]none:  (-8.556050344850203e+96 -7.922576985868201e-83 2.1548182655933656e-147): 1
* [misc]none:  (-1.7889344297298395e-138 8.336613082028674e+83 -5.612374503803972e+191): 0
* [misc]none:  (2.208377572236396e-264 1.625924245506842e+101 3.6974324674576528e-196): 1
* [misc]none:  (1.194352601301008e+170 -1.2990710049317618e+149 -7.565112997028972e+159): 0
* [misc]none:  (1.1658351917668372e+172 1.3349160645071676e+249 2.931040211928409e-256): 1
* [misc]none:  (-2.439121548558237e-263 7.971191617216227e+278 -5.16988167177608e+53): 0
* [misc]none:  (2.6969709464868204e+192 -3.288801652693557e-126 -1.1724467728438874e+62): 1
* [misc]none:  (2.4787821728961726e-208 -4.583226060750687e+286 4.5505475745463453e+70): 0
* [misc]none:  (-4.7627047558420924e-178 9.818158704343799e+98 1.0173157545581e-152): 1
* [misc]none:  (-5.541734639256592e-158 6.582912119010719e-154 -2.7755596952545536e+214): 0
* [misc]none:  (-6.937852684341488e-17 -3.509811603569984e-162 1.0023146616707945e-196): 0
* [misc]none:  (-1.102805383752407e+91 -1.1833316978686804e-196 -2.074828050091204e+43): 1
* [misc]none:  (-1.6730371273659853e+134 7.03833207774333e+15 -1.3239959970038969e+98): 1
* [misc]none:  (4.1286963732031184e-303 -5.2489676640999375e-37 1.37725435443438e-133): 0
* [misc]none:  (2.7744697188841963e+109 -6.937438758466827e-192 -3.3253159094181508e+99): 1
* [misc]none:  (1.3198936947099211e-96 -1.5451834902703197e-42 -1.7726057829102443e-75): 1
* [misc]none:  (2.332651968655402e-142 -1.0504139891547427e+112 1.714387790028798e+53): 0
* [misc]none:  (1.0835466360416472e+257 2.2433259629035416e-110 4.4964231441929855e-212): 1
* [misc]none:  (-1.1740030617157484e-279 -1.2604014885172566e-16 -3.533444382159577e+294): 0
* [misc]none:  (4.163796059008999e+263 9.568517745632325e+214 2.9372247799245325e+93): 1
* [misc]none:  (3.280888101399023e-178 2.4645417753990825e-46 1.1531681692158285e+126): 0
* [misc]none:  (-2.094542504845539e+96 3.658887962688304e-221 -8.114819311899108e-200): 1
* [misc]none:  (-3.106463349287814e-283 -3194.11813336966 3.8921610463731365e-84): 0
* [misc]none:  (-8.851204171241843e+281 -9.262519032529967e-34 -1.785130886221006e+231): 1
* [misc]none:  (5.244418714777191e-247 -1.1047298144911661e-128 -3.806792758567173e-77): 0
* [misc]none:  (8.483535156875368e-302 -1.345613125533753e+279 -1.8508777881935605e+151): 0
* [misc]none:  (-0.0006673038257262197 2.8621091346925045e-294 1.532108192832722e+128): 1
* [misc]none:  (-5.0502610074661083e+207 3.789685423350582e-08 -1.2565837085170136e-39): 0
* [misc]none:  (1.762534146009323e+140 -1.0334310654904308e-302 6.545384967014291e-225): 1
* [misc]none:  (9.107018310586045e+54 -2.971342031183356e+89 -1.6718446752859893e+111): 0
* [misc]none:  (4.918436108504659e-301 -2.0718283319643413e+202 -1.6194758145392415e-55): 0
* [misc]none:  (1.6691081971097037e+94 -7.498270199484197e+128 2.7394548302027227e-88): 0
* [misc]none:  (-3.8474489635359294e+91 3.118009484335783e-104 -5.8304170084179074e-46): 1
* [misc]none:  (-2.67503022703027e-297 -2.5128760687731143e+95 8995869217554.457): 0
* [misc]none:  (-1.9632140373363783e+122 1.2420866124564814e-293 6.3461851602547e-177): 1
* [misc]none:  (-3.432853067516309e-246 2.0914477614867384e-227 2.01314860958205e-179): 1
* [misc]none:  (4.1821161712206335e+98 -1.06513481701701e-107 -4.126212717690705e-129): 0
* [misc]none:  (-6.0258374336189325e+121 1.241885419647938e+111 3.5248326356674874e-60): 1
* [misc]none:  (-185563564389128.0 -3.2505753217846565e-280 -3.802991462899128e-34): 1
* [misc]none:  (2.5937923840174148e+191 2.0634010725481968e+279 -6.71288738518563e+35): 0
* [misc]none:  (-1.3468517163131261e+272 3.7544706354148685e+249 -5.537735150627702e+213): 1
* [misc]none:  (1.740072246435861e-207 1.3636559368742825e-149 1.946944651699716e-139): 0
* [misc]none:  (6.333153678225876e-68 8.70336562916574e-216 7.84549397492709e+169): 0
* [misc]none:  (6363.313367940982 -1.977991260671615e-272 7.762114448443534e+255): 0
* [misc]none:  (1.682179526351612e+60 1.3399459123824423e-08 -2.0088395627297287e+293): 0
* [misc]none:  (-2.0811417072211844e+239 -2.4464470346425223e-307 6.330170018440137e-77): 1
* [misc]none:  (6.04623429007003e-242 -4.345326241698038e-278 5.823432666941199e+232): 0
* [misc]none:  (-3.1969871529936574e+166 3.226368417375545e+273 3.982342803919231e-46): 1
* [misc]none:  (-1.1442254260677068e-38 -1.1682833194119885e+290 1.7119636201650242e-68): 1
* [misc]none:  (5.22304174043592e-158 -3.807000870050907e+58 -1.6925574577510237e+214): 0
* [misc]none:  (8.377477023109926e-106 2.3080855823624493e-299 4.50326449267665e+246): 0
* [misc]none:  (1.0100264902476595e-152 6.2370208452565505e-251 -1.3788511600691207e+143): 0
* [misc]none:  (-9.563665845262864e+134 -4.34857343156037e+281 6.2285928439400495e+156): 2
* [misc]none:  (0.002518103001908201 2.819308104709626e+146 -4.0300440872978227e-184): 1
* [misc]none:  (1.4105181521169557e+85 -2.665217209595492e+188 3.5241094689699846e+143): 1
* [misc]none:  (4.19388438569828e-183 3.636662419716013e-100 -1.2948317804463169e-282): 1
* [misc]none:  (-2.8090151520671207e+163 2.984404923140836e-249 5.437516292888218e-268): 1
* [misc]none:  (5.520248382898629e-230 6.71342285975285e-63 -3.464947738442053e-155): 1
* [misc]none:  (4.004060788521414e+101 5.679811834757315e+283 -6.473810795939257e+164): 1
* [misc]none:  (3.588388254213374e-229 -1139547812.809111 4.890275917515567e-08): 0
* [misc]none:  (-5.005096670380054e+47 -1.1716631781329626e-278 2.3982589341782892e+126): 1
* [misc]none:  (-3.4998489762015864e-219 1.2430204782976187e-178 -1.9903644617661157e-253): 1
* [misc]none:  (-2.385315376938663e+253 1.6672558556111832e-132 -5.52786254698352e+123): 1
* [misc]none:  (-3.3129658515159495e+106 -2.2098708111796672e-198 -2.404284016476968e+279): 0
* [misc]none:  (1.233722688499856e-260 -3.5028343458937535e-90 5.227910927587319e+245): 0
* [misc]none:  (-63767.21419834566 -1.7606249358192524e+273 267950632.53292695): 1
* [misc]none:  (5.624641690736252e-214 8.322805913504859e+214 3.2616756987284277e-94): 2
* [misc]none:  (5.772678079688886e-193 -6.744341629118722e+132 6.954230926244437e-248): 0
* [misc]none:  (-8.888663579267588e+145 -1.2824561231119317e-43 -5.084319674250709e+292): 1
* [misc]none:  (1.2017614084255727e-118 2.163051204570009e+135 -9.483463323409894e+83): 0
* [misc]none:  (1.3207468552144425e-275 1.2439278636891217e+233 1.1524614864139226e-160): 1
* [misc]none:  (1.5181493189729785e-210 2.5055367778394023e+168 161620833577619.34): 0
* [misc]none:  (2.9543484210487e+68 -4.0220565746330086e+125 -1.6011896215578737e-278): 1
* [misc]none:  (-8.84696133260257e-277 1.0241174400059815e-119 -1.279384825639919e+218): 0
* [misc]none:  (-4.0734910927239613e+279 -2.2941123619407014e-42 -1.5101815541228603e-252): 0
* [misc]none:  (4.849304008883996e+136 -1.9158965524986357e+21 -1.0078494497283481e-63): 0
* [misc]none:  (-4.666260546447364e-94 7.089677021982108e+243 5.396180940081133e+274): 0
* [misc]none:  (-1.0374694539724338e-22 3.1474503815022313e+156 2.237363577109642e+74): 2
* [misc]none:  (1.6588937679962464e-112 3.192528639732453e+177 -5.90661572185385e+255): 0
* [misc]none:  (1.1908969294818754e-266 3.099784283699168e-174 -4.3665826438370466e+132): 0
* [misc]none:  (-1.0295936791749538e-299 -2.3878879079615316e+176 -2.7604299366199517e-300): 0
* [misc]none:  (-7.185580883046913e-107 -9.568148082725508e-90 -1.9577524593014605e+255): 0
* [misc]none:  (2.4666697643039057e+135 -9.953058197226308e-231 -1.6523309537219388e+292): 0
* [misc]none:  (1.4077992202573094e+157 -1.6969785717566782e-186 1.2222350343583978e+196): 0
* [misc]none:  (-1.4775843798497103e-226 1.13308848626096e-94 -1.0922245877481088e-202): 1
* [misc]none:  (4.042918419768235e-293 -3.2304680091420593e+273 -1.5418757249344543e-63): 0
* [misc]none:  (-1.5808149525401404e+250 3.027496459540811e+165 -1.2288638190895444e-91): 1
* [misc]none:  (-2.2214116445848722e-125 7.06806421332372e-195 -1.6177284163081556e-296): 1
* [misc]none:  (1.3558740031834803e-64 -9.115550998149062e+67 -4.7657636456813475e+188): 0
* [misc]none:  (6.054739181733751e+60 -3.7471130771905855e-70 -1.652280336936078e-182): 1
* [misc]none:  (-5.086606424901955e-26 -4.150888523033341e+56 2.5369593669384417e-158): 1
* [misc]none:  (4.1567543090652754e-33 -7.628468316635274e+118 -2.1412051815551306e+98): 3
* [misc]none:  (-7.67790351718318e-207 -1.1396663342585698e+185 -1.4047943834222912e+32): 0
* [misc]none:  (1.0167208681953543e+192 1.5933622570633916e-225 -8.205466933650709e-224): 1
* [misc]none:  (1.23513259853389e-199 -2.455637018443649e+26 -5.138936398971843e-75): 1
* [misc]none:  (4.3707194781987494e-97 -2.547315038123042e-87 3.4204094411255474e+115): 0
* [misc]none:  (31.114677989939693 2.800912164521124e-20 -3.2777951328230936e-29): 1
* [misc]none:  (-5.5773404803592965e+259 3.7931337372770976e-299 2.786772086490314e-60): 0
* [misc]none:  (-5.616681094429007e+40 3.096144630304459e-05 -3.1136499993102923e-28): 1
* [misc]none:  (2.1273566438007147e+264 2.075848018336343e+269 -1.6092812022702055e+27): 1
* [misc]none:  (-4.049616931519095e-12 5.231369250464457e+247 -8.701752776315519e+299): 0
* [misc]none:  (1.341667886706771e+115 3.8005266578165216e-258 -1.0098619973673771e+143): 1
* [misc]none:  (2.57846868660545e+128 1.8293764358985593e+179 -3.4049300239591715e+140): 1
* [misc]none:  (-3.2101962723934187e-96 7.417468591127432e+67 -3.877298803162118e-30): 1
* [misc]none:  (-1.8198742460941646e-81 -2.0820068164655182e+40 -7.236742688934569e+286): 0
* [misc]none:  (-8.323040591341415e+218 -4.677922974670643e+80 -6.692473243860769e+126): 1
* [misc]none:  (-1.9106041457506788e-63 3.747520792911468e+127 5.430483387973432e+258): 0
* [misc]none:  (2.2335992870926316e-153 1.4503417141831182e+51 2.0547294018965633e+61): 0
* [misc]none:  (7.852155885222424e-118 -2.8375357663701133e-215 6.513244922065764e-226): 1
* [misc]none:  (7.385144370900328e+173 -5.542636511154422e+167 7.908117764318118e+264): 1
* [misc]none:  (-2.441280553156046e-191 -8.5828334236211e+37 -1.0997158053453796e+52): 0
* [misc]none:  (6.819956828556854e+177 -3.987835231847739e-28 -1.3157971823804226e+26): 1
* [misc]none:  (3.2159945588434616e-06 5.306065123039819 -7.710049967444384e+140): 1
* [misc]none:  (9.03697438609635e-254 5.834916983599053e-288 -3.248874545341504e+57): 0
* [misc]none:  (-4.693794485448123e+266 -1.0182917238227828e-268 7.874050663202412e-138): 1
* [misc]none:  (-2.9961253346398193e-277 -4.2324566784967944e-196 -6.824787913341571e-74): 0
* [misc]none:  (8.573472507341022e+41 -3.1598975960421508e+277 -3.3169741611569367e+305): 0
* [misc]none:  (1.4410801258605738e+62 106537.6777769988 -2.6159166493367154e-235): 3
* [misc]none:  (-2.576894021693856e-173 -4.230280825094585e+83 8.062228390339164e-110): 2
* [misc]none:  (-1.8358840832683498e+44 -2.156801537654526e+36 -3.512703779155646e-87): 1
* [misc]none:  (-6.846939373244303e+227 2.125743593675342e+150 -3.1982664100230636e+83): 1
* [misc]none:  (-6.253340869605864e+291 1.4031893252788157e-130 -2.4878548514423325e+131): 1
* [misc]none:  (4.547656836966103e-26 -9.296466940750938e-169 2.3403140268290895e-220): 1
* [misc]none:  (-5.094827374807951e+22 -3.0047845617322243e+245 3.456521015844278e-267): 0
* [misc]none:  (5.548340076310199e-111 -5.686069957565031e-220 -4.479806301623672e-178): 1
* [misc]none:  (-2.3266982566628708e-73 -4.924557161248151e-49 2.0491433117473444e+251): 0
* [misc]none:  (2.1868710093441635e-94 -2.9110234445746466e+124 4.292734438749543e-07): 1
* [misc]none:  (-1.3160349663332311e-291 -1.0651455859079758e-283 4.626894916535224e-128): 0
* [misc]none:  (1.114170127871121e+259 8.453366577306196e-160 -8.935111048608571e-173): 1
* [misc]none:  (-5.548866558621532e-09 0.0019265340891290363 2.5107596839002617e-188): 1
* [misc]none:  (-2715439348210.3716 3.8364962842018573e-131 -8.310532646005735e-88): 1
* [misc]none:  (9.373070312843732e-91 -1.3476877676941842e+188 -1.1445296297917484e+276): 0
* [misc]none:  (-2.854465274914285e+95 1.5238038259281467e+97 -2.9771655786075137e-170): 3
* [misc]none:  (1.011727234239232e-268 5.76823955439101e-249 -2.0681820259142047e+203): 0
* [misc]none:  (-5.358736018951544e-210 -3.780049011953038e-263 -7.356146101163064e-142): 1
* [misc]none:  (-4.679560768974975e-224 -1.7581458633759795e+76 -2.615425031816684e-28): 0
* [misc]none:  (9.00969948519257e+300 -4.472004514616723e-118 2.4547241600019345e+232): 1
* [misc]none:  (7.022076711242115e-133 -7.904392031638281e+133 -5.94028418794007e+211): 0
* [misc]none:  (-9.328298623753299e+123 -1.0504234320141073e+133 2.943249346534323e+144): 1
* [misc]none:  (-5.6215764598070664e+281 7.885146171822741e-252 4.254787401710164e+249): 1
* [misc]none:  (1.376461838305041e-44 1.1351952620028756e+104 4.887341950722903e-119): 1
* [misc]none:  All alt indexes
* [misc]none:  (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 0
* [misc]none:  (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))): 1
* [misc]none:  (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 2
* [misc]none:  (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 3
* [misc]none:  (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 4
* [misc]none:  (λ (J K U) (cbrt (* (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))): 5
* [misc]none:  Best alt per point
* [misc]none:  (1.8269212298308998e+214 1789977963981.046 -1.7899154283931006e-62): 0
* [misc]none:  (1.6281717766697912e+39 3.5243641367880456e+86 -3.0008256032154172e-176): 0
* [misc]none:  (-7.986330642950897e-117 1.1611754700502491e-55 8.728226238434233e-64): 0
* [misc]none:  (-1.6133455999823373e+110 -3.9890484917100117e+257 -1.5117832743647305e-21): 0
* [misc]none:  (3.928924306566786e-70 5.222760300460367e-180 -4.026134204708055e+160): 0
* [misc]none:  (2.281413649637054e-166 4.156243175149629e-181 -9.231874857928986e-255): 0
* [misc]none:  (-1.65054043818576e-39 -1.0058709145515093e+290 -4.753699147196455e-118): 0
* [misc]none:  (-4.805584106456354e-282 -0.15058815983267834 3.714800492587865e+85): 0
* [misc]none:  (-4.7089063680709754e+260 4.344802098601123e-298 4.508329239962989e+257): 0
* [misc]none:  (-1.211264682641895e-292 1.0495684746531957e+167 2.721003254105153e-81): 0
* [misc]none:  (-3.0671153252781823e-63 -7.74362334743424e+32 -2.2376851712564295e-118): 0
* [misc]none:  (1.64239269831532e+149 -1.576948173228613e+33 9.680698928511806e-32): 0
* [misc]none:  (1.954959341132994e-252 -7.83347153590065e-06 5.521334390623478e-06): 0
* [misc]none:  (-3.229654932887624e+201 -9.827696191097834e-18 -1.3343140776153144e-304): 0
* [misc]none:  (-9.906575581428813e+195 7.10957194421701e+200 -4.7756557550151386e+160): 0
* [misc]none:  (2.4256946179069016e+78 6.207394963032113e+30 -7.218692088264328e+54): 0
* [misc]none:  (8.781920275794267e+61 3.5618749791650757e+87 4.9372470656494625e-201): 0
* [misc]none:  (1.4446355009900792e+23 -3.5082856951249954e-122 9.917487178181935e-54): 0
* [misc]none:  (-7.01049497494046e-138 3.841494064694043e+276 3.642806409692576e+70): 0
* [misc]none:  (-3.326243684234595e+241 -7.587678445119084e+247 1.518078533135906e+61): 0
* [misc]none:  (1.5052438492777668e+214 1.5460201380138582e-108 6.354924490516637e-174): 0
* [misc]none:  (1.1935837539207151e+36 -1.6901036379481523e+68 5.558607723763576e+296): 0
* [misc]none:  (-5129.844514220037 -8.518839978003416e+199 5.0618502549145104e+216): 0
* [misc]none:  (-2.0899529309308688e-173 -1.3078423091955545e+95 8.726419779901594e-156): 0
* [misc]none:  (1.5484790382727637e+258 2.2758369496030736e+44 2.7646272679971947e+138): 0
* [misc]none:  (1.8029164814151534e-305 -8.140052952226443e-29 -3.868827374468717e+273): 0
* [misc]none:  (-9.30868828487235e-242 7.865810923274834e+251 -1.977339157633397e-22): 0
* [misc]none:  (-12396.634829186376 2.0737883409435182e-60 8.938208620266642e-81): 0
* [misc]none:  (-1.0125994980022202e+121 9.949795070357293e-13 3.9753155304068916e+192): 0
* [misc]none:  (-1.5751944823937151e-208 -5.711690539427335e-292 2.0698086438592394e+99): 0
* [misc]none:  (8.149794087375897e+77 1.4399038101240658e-157 -0.0033935472374883513): 0
* [misc]none:  (-1.873060887288803e+204 6.486236446634097e-143 -6.777569686362558e+23): 0
* [misc]none:  (-3.976258322985434e+241 1.0713666056080785e-84 -1.4481584190101499e-109): 0
* [misc]none:  (1.8890847145741933e+54 5.334416108525731e+103 8.243928876632343e+120): 0
* [misc]none:  (4.915746009665795e+153 -1.2716911445748643e-294 -1.178199525484178e+291): 0
* [misc]none:  (-2.616452914461827e+123 -1.3552545859518693e-149 1.0769411808120101e+237): 0
* [misc]none:  (2.7212207505395135e+138 -1.7192030807828345e+260 -3.070590530502344e+254): 1
* [misc]none:  (4.3361011341035273e+108 -7.078347720981057e+296 -1.1633032638785635e+290): 0
* [misc]none:  (-2.3832835734274537e-77 -2.0550237535049573e-58 3.3652051120813564e-167): 0
* [misc]none:  (-1.6071108269264857e+240 2.2507296241296892e-278 -8.625502649886978e-116): 0
* [misc]none:  (-7.605291673043568e+86 1.3555181915244097e+58 5.535572593369702e+234): 1
* [misc]none:  (1.1281253812481777e-05 -7.875416682732296e+153 2.953059473116585e-77): 0
* [misc]none:  (-1.7943678282584236e+305 -8.253144371362014e+269 1.6962188327979892e+156): 0
* [misc]none:  (-3.0357430466827192e+202 7.526837789610841e+223 -1.0160940285787676e+119): 0
* [misc]none:  (6.853656747763464e-298 1.5907488733120222e-68 -4.474252265840201e+73): 0
* [misc]none:  (1.3833425279814779e+61 -4.807303049624254e-15 1.8641906072853124e-122): 0
* [misc]none:  (-3.0274687809727364e-300 7.50358512361513e-69 1.5464847509065313e+116): 0
* [misc]none:  (-7.218711869488973e-243 -587327855578134.2 -3.1846212263600816e-18): 0
* [misc]none:  (4.242186305736945e+277 7.288958178428041e-256 5.409384226193089e+76): 0
* [misc]none:  (-2.319372457341872e-287 4.187380162585325e-193 -1.32843112383632e+222): 0
* [misc]none:  (-1.1299275128362188e+120 6.659322155044152e+223 -2.5903554766194963e+287): 0
* [misc]none:  (-7.84381588726745e-44 3.9248553939523704e-204 -2.4810437085982083e-110): 0
* [misc]none:  (2.623583837461381e+148 -4.810065069789271e-38 1.6579472731822137e+209): 0
* [misc]none:  (7.148125858281279e-128 -1.1410424941898917e-307 -7.884101440606108e+43): 0
* [misc]none:  (3.2782900783384907e+260 1.2654023023741973e+87 5.3297020297971135e-251): 2
* [misc]none:  (4.360233270161975e+69 -1.2973858626691246e+248 -1.3038350073216301e+175): 1
* [misc]none:  (6.186245288104366e-177 4.0009214940503626e-296 -3.1670246594447204e-244): 0
* [misc]none:  (-4.944977315465704e+134 3.7946864491882027e-174 7.967379897939584e-266): 0
* [misc]none:  (5.338353252944482e+295 2.475773952907049e-271 5.261531518469373e-290): 0
* [misc]none:  (2.555657911489638e+100 2.1545947154827896e+229 2.6209188754640728e+107): 0
* [misc]none:  (1.0367654190214238e+155 7.510167254913154e-75 -1.879438806525893e-17): 0
* [misc]none:  (-2.2458375637103902e-132 -9.791675790911144e+50 5.462119320563526e+16): 3
* [misc]none:  (-7.461408405072584e-11 2.819362408294866e+247 5.576422555370537e+229): 0
* [misc]none:  (-1.2634592988240547e+184 -2.046312445248254e+167 -2.5768688170454604e-166): 4
* [misc]none:  (-2.3695265370701153e-160 5.627370989949808e+102 -1.1307817728525e-192): 0
* [misc]none:  (2.729599448498006e-142 1.268161462925599e-223 1.8558602765266175e+154): 0
* [misc]none:  (8.010626774664954e-118 3.197294045188449e-213 -3.8061627632242695e+220): 0
* [misc]none:  (1.4601547257514377e-37 6.851358071879168e+277 -1.4026731237337527e+299): 0
* [misc]none:  (1.2309532522175715e-227 5.849070875002102e-168 -1.8322924530722165e+176): 0
* [misc]none:  (2.6481468427206757e-89 1.8304705420573128e+300 5.162437418074754e-216): 0
* [misc]none:  (5.884862647618943e+102 1.3917287586797797e+215 -1.9484215729108895e+208): 1
* [misc]none:  (2.7534373406057187e+274 -6.754823491493555e-24 -2.4266153803656513e-110): 0
* [misc]none:  (2.802805856656922e+299 3267744482859.4893 -2.125403821003621e+259): 0
* [misc]none:  (-5.821161027096475e-49 4.3906960513010925e-288 9.735553079850294e-195): 0
* [misc]none:  (-2.4642361000377723e+179 -223338690.5739434 2.617385806499904e-208): 0
* [misc]none:  (6.454193966659965e-12 1.2843486366644783e+218 1.6598105327534946e+245): 0
* [misc]none:  (-2.2565106546246065e+111 -8.921793657844595e+241 -1.2504926677350782e+286): 0
* [misc]none:  (2142884768423.9766 -1.0342577969053837e-127 1.1325567110922881e-222): 0
* [misc]none:  (6.352964037059704e-48 2.0675888684205106e-37 3.9955309460256863e-193): 0
* [misc]none:  (-6.802352065741283e-237 1.7860466700053246e+179 -2.1540953112813662e-178): 0
* [misc]none:  (-1.1984894069610523e-255 2.286904329311883e+176 -3.0869297245392077e+307): 0
* [misc]none:  (-7.242911167116891e-28 -3.652961257321153e+269 -1.981435962910265e-248): 4
* [misc]none:  (1.434478809327731e-162 1.7673263201240207e+200 4.1358060479750856e+163): 0
* [misc]none:  (2.77377213114978e+181 -2.5233739143143128e-166 7.0699594918945535e-177): 0
* [misc]none:  (1.5437232098269186e+160 -5.1984298768145166e+116 -1.2768311469464077e-95): 0
* [misc]none:  (-4.0802892718556596e+97 -4.502005664483894e-90 -1.3669353810280968e+130): 3
* [misc]none:  (3.5925206879521377e-169 -1.3877894503805502e+162 3.851639943546658e-220): 0
* [misc]none:  (7.262940842293714e+141 2.5169641752150834e-130 -2.4010908942747236e-247): 0
* [misc]none:  (1.5786239562667337e+192 -1.646250865837071e-08 -4.6981533625942616e-48): 0
* [misc]none:  (-1.3666403621362786e-250 1175954691713314.2 1.6505576250215693e+254): 0
* [misc]none:  (-8.454483141733306e+289 3.2999709724191907e-111 -6.317430000587058e+24): 0
* [misc]none:  (-4.671984247068368e+114 -2.9619260441588295e+211 -7.22878673519174e-279): 0
* [misc]none:  (-3.759430214395936e-120 -1.445629235880647e+140 2.1262474173228004e+275): 0
* [misc]none:  (2.0609285567281652e-241 1.9640202737101926e+158 4.0355590295024944e+30): 0
* [misc]none:  (-3.1297081963080297e-242 8.94051254019841e+73 -1.0418876601412776e+158): 0
* [misc]none:  (1.334212127520659e-194 2.3042294780211474e+199 -0.1449571473562267): 0
* [misc]none:  (-1.322393042309631e-287 331.0762921520269 2.486727752761897e+186): 0
* [misc]none:  (6.1692613790114145e-176 3.16347551928874e-213 -1.999009223927216e-112): 0
* [misc]none:  (1.6628640493696272e+86 -1.5025592441357432e-91 1.526533864556896e-136): 0
* [misc]none:  (-1.1590427293178154e-110 2.3621708607435707e+306 -2.12081898299509e-251): 0
* [misc]none:  (-4.444969967255464e-50 -7.309457855467372e+172 -5.496412463214942e+159): 0
* [misc]none:  (-1.4721600470373534e-29 3.795139234164696e-109 9.806701774277626e-103): 0
* [misc]none:  (-3.123985774571585e+305 4.3713778543032466e+80 9.77689775396416e+270): 0
* [misc]none:  (-3.9142022803361806e-187 -5.65740503188699e+260 5.701436151254667e-51): 1
* [misc]none:  (-4.0509904466518765e-37 -6.2678543781187986e-158 2.6870891996869854e+222): 0
* [misc]none:  (1.403842517343178e+239 -4.523272375047282e+19 -3.133147621079016e+299): 0
* [misc]none:  (-3.1263201082196465e-277 4.562606033317646e+142 2.1157410136365666e+27): 0
* [misc]none:  (1.7344997138936077e-42 -3.913559470208424e-83 -2.9867969528063676e+265): 0
* [misc]none:  (3.0173777232564683e+257 1.4365336082533024e-65 7.3222795686052666e+50): 0
* [misc]none:  (-9.290387573799883e-227 2.1939039916199917e-151 6.704445560737266e-185): 0
* [misc]none:  (-9.568307378321542e-67 3.826389705571192e+305 3.2252529629473372e-164): 0
* [misc]none:  (-1.7144787029551547e-76 1945731255459.47 3.4149900413992998e-118): 0
* [misc]none:  (-3.9457481405050707e-140 -3.8831186001124554e+177 3.9566905915205435e+222): 0
* [misc]none:  (-4.045276803805828e+248 2.0407374713985817e-67 6.798712177335776e+112): 0
* [misc]none:  (-1.7506244038659656e+155 -5.551664099930396e+287 1.622208144463601e-166): 0
* [misc]none:  (-8.556050344850203e+96 -7.922576985868201e-83 2.1548182655933656e-147): 0
* [misc]none:  (-1.7889344297298395e-138 8.336613082028674e+83 -5.612374503803972e+191): 0
* [misc]none:  (2.208377572236396e-264 1.625924245506842e+101 3.6974324674576528e-196): 1
* [misc]none:  (1.194352601301008e+170 -1.2990710049317618e+149 -7.565112997028972e+159): 0
* [misc]none:  (1.1658351917668372e+172 1.3349160645071676e+249 2.931040211928409e-256): 0
* [misc]none:  (-2.439121548558237e-263 7.971191617216227e+278 -5.16988167177608e+53): 0
* [misc]none:  (2.6969709464868204e+192 -3.288801652693557e-126 -1.1724467728438874e+62): 0
* [misc]none:  (2.4787821728961726e-208 -4.583226060750687e+286 4.5505475745463453e+70): 0
* [misc]none:  (-4.7627047558420924e-178 9.818158704343799e+98 1.0173157545581e-152): 0
* [misc]none:  (-5.541734639256592e-158 6.582912119010719e-154 -2.7755596952545536e+214): 0
* [misc]none:  (-6.937852684341488e-17 -3.509811603569984e-162 1.0023146616707945e-196): 0
* [misc]none:  (-1.102805383752407e+91 -1.1833316978686804e-196 -2.074828050091204e+43): 0
* [misc]none:  (-1.6730371273659853e+134 7.03833207774333e+15 -1.3239959970038969e+98): 0
* [misc]none:  (4.1286963732031184e-303 -5.2489676640999375e-37 1.37725435443438e-133): 0
* [misc]none:  (2.7744697188841963e+109 -6.937438758466827e-192 -3.3253159094181508e+99): 0
* [misc]none:  (1.3198936947099211e-96 -1.5451834902703197e-42 -1.7726057829102443e-75): 3
* [misc]none:  (2.332651968655402e-142 -1.0504139891547427e+112 1.714387790028798e+53): 0
* [misc]none:  (1.0835466360416472e+257 2.2433259629035416e-110 4.4964231441929855e-212): 0
* [misc]none:  (-1.1740030617157484e-279 -1.2604014885172566e-16 -3.533444382159577e+294): 0
* [misc]none:  (4.163796059008999e+263 9.568517745632325e+214 2.9372247799245325e+93): 0
* [misc]none:  (3.280888101399023e-178 2.4645417753990825e-46 1.1531681692158285e+126): 0
* [misc]none:  (-2.094542504845539e+96 3.658887962688304e-221 -8.114819311899108e-200): 0
* [misc]none:  (-3.106463349287814e-283 -3194.11813336966 3.8921610463731365e-84): 0
* [misc]none:  (-8.851204171241843e+281 -9.262519032529967e-34 -1.785130886221006e+231): 0
* [misc]none:  (5.244418714777191e-247 -1.1047298144911661e-128 -3.806792758567173e-77): 0
* [misc]none:  (8.483535156875368e-302 -1.345613125533753e+279 -1.8508777881935605e+151): 0
* [misc]none:  (-0.0006673038257262197 2.8621091346925045e-294 1.532108192832722e+128): 0
* [misc]none:  (-5.0502610074661083e+207 3.789685423350582e-08 -1.2565837085170136e-39): 0
* [misc]none:  (1.762534146009323e+140 -1.0334310654904308e-302 6.545384967014291e-225): 0
* [misc]none:  (9.107018310586045e+54 -2.971342031183356e+89 -1.6718446752859893e+111): 0
* [misc]none:  (4.918436108504659e-301 -2.0718283319643413e+202 -1.6194758145392415e-55): 0
* [misc]none:  (1.6691081971097037e+94 -7.498270199484197e+128 2.7394548302027227e-88): 0
* [misc]none:  (-3.8474489635359294e+91 3.118009484335783e-104 -5.8304170084179074e-46): 0
* [misc]none:  (-2.67503022703027e-297 -2.5128760687731143e+95 8995869217554.457): 0
* [misc]none:  (-1.9632140373363783e+122 1.2420866124564814e-293 6.3461851602547e-177): 0
* [misc]none:  (-3.432853067516309e-246 2.0914477614867384e-227 2.01314860958205e-179): 0
* [misc]none:  (4.1821161712206335e+98 -1.06513481701701e-107 -4.126212717690705e-129): 0
* [misc]none:  (-6.0258374336189325e+121 1.241885419647938e+111 3.5248326356674874e-60): 0
* [misc]none:  (-185563564389128.0 -3.2505753217846565e-280 -3.802991462899128e-34): 0
* [misc]none:  (2.5937923840174148e+191 2.0634010725481968e+279 -6.71288738518563e+35): 0
* [misc]none:  (-1.3468517163131261e+272 3.7544706354148685e+249 -5.537735150627702e+213): 0
* [misc]none:  (1.740072246435861e-207 1.3636559368742825e-149 1.946944651699716e-139): 0
* [misc]none:  (6.333153678225876e-68 8.70336562916574e-216 7.84549397492709e+169): 0
* [misc]none:  (6363.313367940982 -1.977991260671615e-272 7.762114448443534e+255): 0
* [misc]none:  (1.682179526351612e+60 1.3399459123824423e-08 -2.0088395627297287e+293): 0
* [misc]none:  (-2.0811417072211844e+239 -2.4464470346425223e-307 6.330170018440137e-77): 0
* [misc]none:  (6.04623429007003e-242 -4.345326241698038e-278 5.823432666941199e+232): 0
* [misc]none:  (-3.1969871529936574e+166 3.226368417375545e+273 3.982342803919231e-46): 0
* [misc]none:  (-1.1442254260677068e-38 -1.1682833194119885e+290 1.7119636201650242e-68): 0
* [misc]none:  (5.22304174043592e-158 -3.807000870050907e+58 -1.6925574577510237e+214): 0
* [misc]none:  (8.377477023109926e-106 2.3080855823624493e-299 4.50326449267665e+246): 0
* [misc]none:  (1.0100264902476595e-152 6.2370208452565505e-251 -1.3788511600691207e+143): 0
* [misc]none:  (-9.563665845262864e+134 -4.34857343156037e+281 6.2285928439400495e+156): 1
* [misc]none:  (0.002518103001908201 2.819308104709626e+146 -4.0300440872978227e-184): 0
* [misc]none:  (1.4105181521169557e+85 -2.665217209595492e+188 3.5241094689699846e+143): 1
* [misc]none:  (4.19388438569828e-183 3.636662419716013e-100 -1.2948317804463169e-282): 0
* [misc]none:  (-2.8090151520671207e+163 2.984404923140836e-249 5.437516292888218e-268): 0
* [misc]none:  (5.520248382898629e-230 6.71342285975285e-63 -3.464947738442053e-155): 0
* [misc]none:  (4.004060788521414e+101 5.679811834757315e+283 -6.473810795939257e+164): 0
* [misc]none:  (3.588388254213374e-229 -1139547812.809111 4.890275917515567e-08): 0
* [misc]none:  (-5.005096670380054e+47 -1.1716631781329626e-278 2.3982589341782892e+126): 0
* [misc]none:  (-3.4998489762015864e-219 1.2430204782976187e-178 -1.9903644617661157e-253): 0
* [misc]none:  (-2.385315376938663e+253 1.6672558556111832e-132 -5.52786254698352e+123): 0
* [misc]none:  (-3.3129658515159495e+106 -2.2098708111796672e-198 -2.404284016476968e+279): 0
* [misc]none:  (1.233722688499856e-260 -3.5028343458937535e-90 5.227910927587319e+245): 0
* [misc]none:  (-63767.21419834566 -1.7606249358192524e+273 267950632.53292695): 1
* [misc]none:  (5.624641690736252e-214 8.322805913504859e+214 3.2616756987284277e-94): 1
* [misc]none:  (5.772678079688886e-193 -6.744341629118722e+132 6.954230926244437e-248): 0
* [misc]none:  (-8.888663579267588e+145 -1.2824561231119317e-43 -5.084319674250709e+292): 0
* [misc]none:  (1.2017614084255727e-118 2.163051204570009e+135 -9.483463323409894e+83): 0
* [misc]none:  (1.3207468552144425e-275 1.2439278636891217e+233 1.1524614864139226e-160): 0
* [misc]none:  (1.5181493189729785e-210 2.5055367778394023e+168 161620833577619.34): 0
* [misc]none:  (2.9543484210487e+68 -4.0220565746330086e+125 -1.6011896215578737e-278): 0
* [misc]none:  (-8.84696133260257e-277 1.0241174400059815e-119 -1.279384825639919e+218): 0
* [misc]none:  (-4.0734910927239613e+279 -2.2941123619407014e-42 -1.5101815541228603e-252): 0
* [misc]none:  (4.849304008883996e+136 -1.9158965524986357e+21 -1.0078494497283481e-63): 2
* [misc]none:  (-4.666260546447364e-94 7.089677021982108e+243 5.396180940081133e+274): 0
* [misc]none:  (-1.0374694539724338e-22 3.1474503815022313e+156 2.237363577109642e+74): 4
* [misc]none:  (1.6588937679962464e-112 3.192528639732453e+177 -5.90661572185385e+255): 0
* [misc]none:  (1.1908969294818754e-266 3.099784283699168e-174 -4.3665826438370466e+132): 0
* [misc]none:  (-1.0295936791749538e-299 -2.3878879079615316e+176 -2.7604299366199517e-300): 0
* [misc]none:  (-7.185580883046913e-107 -9.568148082725508e-90 -1.9577524593014605e+255): 0
* [misc]none:  (2.4666697643039057e+135 -9.953058197226308e-231 -1.6523309537219388e+292): 0
* [misc]none:  (1.4077992202573094e+157 -1.6969785717566782e-186 1.2222350343583978e+196): 0
* [misc]none:  (-1.4775843798497103e-226 1.13308848626096e-94 -1.0922245877481088e-202): 0
* [misc]none:  (4.042918419768235e-293 -3.2304680091420593e+273 -1.5418757249344543e-63): 0
* [misc]none:  (-1.5808149525401404e+250 3.027496459540811e+165 -1.2288638190895444e-91): 0
* [misc]none:  (-2.2214116445848722e-125 7.06806421332372e-195 -1.6177284163081556e-296): 0
* [misc]none:  (1.3558740031834803e-64 -9.115550998149062e+67 -4.7657636456813475e+188): 0
* [misc]none:  (6.054739181733751e+60 -3.7471130771905855e-70 -1.652280336936078e-182): 0
* [misc]none:  (-5.086606424901955e-26 -4.150888523033341e+56 2.5369593669384417e-158): 0
* [misc]none:  (4.1567543090652754e-33 -7.628468316635274e+118 -2.1412051815551306e+98): 0
* [misc]none:  (-7.67790351718318e-207 -1.1396663342585698e+185 -1.4047943834222912e+32): 0
* [misc]none:  (1.0167208681953543e+192 1.5933622570633916e-225 -8.205466933650709e-224): 0
* [misc]none:  (1.23513259853389e-199 -2.455637018443649e+26 -5.138936398971843e-75): 1
* [misc]none:  (4.3707194781987494e-97 -2.547315038123042e-87 3.4204094411255474e+115): 0
* [misc]none:  (31.114677989939693 2.800912164521124e-20 -3.2777951328230936e-29): 0
* [misc]none:  (-5.5773404803592965e+259 3.7931337372770976e-299 2.786772086490314e-60): 0
* [misc]none:  (-5.616681094429007e+40 3.096144630304459e-05 -3.1136499993102923e-28): 0
* [misc]none:  (2.1273566438007147e+264 2.075848018336343e+269 -1.6092812022702055e+27): 0
* [misc]none:  (-4.049616931519095e-12 5.231369250464457e+247 -8.701752776315519e+299): 0
* [misc]none:  (1.341667886706771e+115 3.8005266578165216e-258 -1.0098619973673771e+143): 0
* [misc]none:  (2.57846868660545e+128 1.8293764358985593e+179 -3.4049300239591715e+140): 1
* [misc]none:  (-3.2101962723934187e-96 7.417468591127432e+67 -3.877298803162118e-30): 0
* [misc]none:  (-1.8198742460941646e-81 -2.0820068164655182e+40 -7.236742688934569e+286): 0
* [misc]none:  (-8.323040591341415e+218 -4.677922974670643e+80 -6.692473243860769e+126): 0
* [misc]none:  (-1.9106041457506788e-63 3.747520792911468e+127 5.430483387973432e+258): 0
* [misc]none:  (2.2335992870926316e-153 1.4503417141831182e+51 2.0547294018965633e+61): 0
* [misc]none:  (7.852155885222424e-118 -2.8375357663701133e-215 6.513244922065764e-226): 0
* [misc]none:  (7.385144370900328e+173 -5.542636511154422e+167 7.908117764318118e+264): 1
* [misc]none:  (-2.441280553156046e-191 -8.5828334236211e+37 -1.0997158053453796e+52): 0
* [misc]none:  (6.819956828556854e+177 -3.987835231847739e-28 -1.3157971823804226e+26): 0
* [misc]none:  (3.2159945588434616e-06 5.306065123039819 -7.710049967444384e+140): 0
* [misc]none:  (9.03697438609635e-254 5.834916983599053e-288 -3.248874545341504e+57): 0
* [misc]none:  (-4.693794485448123e+266 -1.0182917238227828e-268 7.874050663202412e-138): 0
* [misc]none:  (-2.9961253346398193e-277 -4.2324566784967944e-196 -6.824787913341571e-74): 0
* [misc]none:  (8.573472507341022e+41 -3.1598975960421508e+277 -3.3169741611569367e+305): 0
* [misc]none:  (1.4410801258605738e+62 106537.6777769988 -2.6159166493367154e-235): 5
* [misc]none:  (-2.576894021693856e-173 -4.230280825094585e+83 8.062228390339164e-110): 1
* [misc]none:  (-1.8358840832683498e+44 -2.156801537654526e+36 -3.512703779155646e-87): 0
* [misc]none:  (-6.846939373244303e+227 2.125743593675342e+150 -3.1982664100230636e+83): 0
* [misc]none:  (-6.253340869605864e+291 1.4031893252788157e-130 -2.4878548514423325e+131): 0
* [misc]none:  (4.547656836966103e-26 -9.296466940750938e-169 2.3403140268290895e-220): 0
* [misc]none:  (-5.094827374807951e+22 -3.0047845617322243e+245 3.456521015844278e-267): 0
* [misc]none:  (5.548340076310199e-111 -5.686069957565031e-220 -4.479806301623672e-178): 0
* [misc]none:  (-2.3266982566628708e-73 -4.924557161248151e-49 2.0491433117473444e+251): 0
* [misc]none:  (2.1868710093441635e-94 -2.9110234445746466e+124 4.292734438749543e-07): 0
* [misc]none:  (-1.3160349663332311e-291 -1.0651455859079758e-283 4.626894916535224e-128): 0
* [misc]none:  (1.114170127871121e+259 8.453366577306196e-160 -8.935111048608571e-173): 0
* [misc]none:  (-5.548866558621532e-09 0.0019265340891290363 2.5107596839002617e-188): 0
* [misc]none:  (-2715439348210.3716 3.8364962842018573e-131 -8.310532646005735e-88): 0
* [misc]none:  (9.373070312843732e-91 -1.3476877676941842e+188 -1.1445296297917484e+276): 0
* [misc]none:  (-2.854465274914285e+95 1.5238038259281467e+97 -2.9771655786075137e-170): 5
* [misc]none:  (1.011727234239232e-268 5.76823955439101e-249 -2.0681820259142047e+203): 0
* [misc]none:  (-5.358736018951544e-210 -3.780049011953038e-263 -7.356146101163064e-142): 0
* [misc]none:  (-4.679560768974975e-224 -1.7581458633759795e+76 -2.615425031816684e-28): 0
* [misc]none:  (9.00969948519257e+300 -4.472004514616723e-118 2.4547241600019345e+232): 0
* [misc]none:  (7.022076711242115e-133 -7.904392031638281e+133 -5.94028418794007e+211): 0
* [misc]none:  (-9.328298623753299e+123 -1.0504234320141073e+133 2.943249346534323e+144): 0
* [misc]none:  (-5.6215764598070664e+281 7.885146171822741e-252 4.254787401710164e+249): 0
* [misc]none:  (1.376461838305041e-44 1.1351952620028756e+104 4.887341950722903e-119): 0
* [misc]none:  Picked alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]pick:  Picked  #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * [misc]progress:  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 2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 1 2)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2 1)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (* 1/2 K)) J))) in 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]backup-simplify:  Simplify (log (/ 1/2 (cos (* 1/2 K)))) into (log (/ 1/2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (/ 1/2 (cos (* 1/2 K))))) into (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (+ (log U) (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))) into (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) into (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) into (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (+ (* (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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log U) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) into (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/2 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))
* [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 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (* 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (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 J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (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 (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 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 (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2 1 2 1)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (* 1/2 K)) J))) in 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]backup-simplify:  Simplify (log (/ 1/2 (cos (* 1/2 K)))) into (log (/ 1/2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (/ 1/2 (cos (* 1/2 K))))) into (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (+ (log U) (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))) into (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) into (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) into (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (+ (* (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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log U) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) into (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/2 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))
* [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 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (* 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (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 J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (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 (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 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 (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))) into (pow (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) into (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) into (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (* 1/2 K)) J))) in 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]backup-simplify:  Simplify (log (/ 1/2 (cos (* 1/2 K)))) into (log (/ 1/2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (/ 1/2 (cos (* 1/2 K))))) into (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (+ (log U) (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))) into (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) into (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) into (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) into (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) into (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 1/4)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 1/4) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) 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 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log U) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) into (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))
* [misc]backup-simplify:  Simplify (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (log (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))) into (* 1/4 (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/4) into (pow (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))) 1/4)
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (+ (* (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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/4))) 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 (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (* 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))) 1/4) into (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/4)
* [misc]approximate:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) 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 (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) into (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) into (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) into (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))))) into 0
* [misc]taylor:  Taking taylor expansion of (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) into (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/4)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/4) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) 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 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (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 J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) into (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/4) into (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/4)
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/4))) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1) 1/4) into (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/4)
* [misc]approximate:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) into (pow (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) into (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/4)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/4) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) 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 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (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 (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) into (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/4) into (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/4)
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/4))) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1) 1/4) into (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/4)
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 1 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))) into (pow (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) into (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) into (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (* 1/2 K)) J))) in 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]backup-simplify:  Simplify (log (/ 1/2 (cos (* 1/2 K)))) into (log (/ 1/2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (/ 1/2 (cos (* 1/2 K))))) into (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (+ (log U) (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))) into (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) into (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) into (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) into (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) into (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 1/4)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 1/4) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) 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 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log U) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) into (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))
* [misc]backup-simplify:  Simplify (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (log (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))) into (* 1/4 (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/4) into (pow (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))) 1/4)
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (+ (* (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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/4))) 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 (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (* 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))) 1/4) into (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/4)
* [misc]approximate:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) 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 (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) into (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) into (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) into (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))))) into 0
* [misc]taylor:  Taking taylor expansion of (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) into (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/4)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/4) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) 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 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (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 J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) into (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/4) into (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/4)
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/4))) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1) 1/4) into (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/4)
* [misc]approximate:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) into (pow (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) into (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/4)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/4) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) 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 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (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 (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) into (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/4) into (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/4)
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/4))) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/4 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1) 1/4) into (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/4)
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2))))>
* * * * [misc]progress:  [ 2 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1))))>
* * * * [misc]progress:  [ 3 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 4 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 5 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 6 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (55 enodes)
* * [misc]simplify:  iters left: 3 (131 enodes)
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 7 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 8 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 9 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (101 enodes)
* * [misc]simplify:  iters left: 2 (324 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 10 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (202 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [enter]simplify:  Simplifying (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (90 enodes)
* * [misc]simplify:  iters left: 3 (337 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 11 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (187 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [enter]simplify:  Simplifying (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (127 enodes)
* * [misc]simplify:  iters left: 2 (484 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 12 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 13 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 14 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 15 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 16 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 17 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 18 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 19 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 20 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (55 enodes)
* * [misc]simplify:  iters left: 3 (131 enodes)
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 21 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 22 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 23 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (101 enodes)
* * [misc]simplify:  iters left: 2 (324 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 24 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (202 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [enter]simplify:  Simplifying (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (90 enodes)
* * [misc]simplify:  iters left: 3 (337 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 25 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (187 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [enter]simplify:  Simplifying (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (127 enodes)
* * [misc]simplify:  iters left: 2 (484 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 26 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 27 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 28 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 29 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/2)))>
* * * * [misc]progress:  [ 30 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (pow (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1)))>
* * * * [misc]progress:  [ 31 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (exp (log (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (log (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (log (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 32 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (log (exp (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (exp (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (exp (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 33 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 34 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (48 enodes)
* * [misc]simplify:  iters left: 3 (108 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 35 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (sqrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (fabs (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 36 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (sqrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 37 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 38 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (sqrt (sqrt 1)) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt 1))
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt 1))
* [exit]simplify:  Simplified to (sqrt (sqrt 1))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 39 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 40 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (sqrt 1) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 41 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (/ (sqrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (sqrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (206 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (35 enodes)
* * [misc]simplify:  iters left: 4 (91 enodes)
* * [misc]simplify:  iters left: 3 (340 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (- (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (- (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 42 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (/ (sqrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (194 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (sqrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [enter]simplify:  Simplifying (sqrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (47 enodes)
* * [misc]simplify:  iters left: 3 (128 enodes)
* * [misc]simplify:  iters left: 2 (485 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 43 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 44 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (fabs (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 45 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (fabs (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 46 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* 1 (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 47 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/2)) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 48 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (pow (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1)) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 49 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (exp (log (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (log (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (log (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 50 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (log (exp (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (exp (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (exp (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 51 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 52 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (cbrt (* (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (48 enodes)
* * [misc]simplify:  iters left: 3 (108 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 53 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (fabs (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 54 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 55 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 56 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt 1)) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt 1))
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt 1))
* [exit]simplify:  Simplified to (sqrt (sqrt 1))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 57 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 58 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (sqrt 1) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 59 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (sqrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (206 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (35 enodes)
* * [misc]simplify:  iters left: 4 (91 enodes)
* * [misc]simplify:  iters left: 3 (340 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (- (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (- (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 60 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (194 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (sqrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [enter]simplify:  Simplifying (sqrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (47 enodes)
* * [misc]simplify:  iters left: 3 (128 enodes)
* * [misc]simplify:  iters left: 2 (485 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 61 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 62 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (fabs (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 63 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (fabs (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 64 / 76 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* 1 (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 65 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* * [misc]simplify:  iters left: 6 (30 enodes)
* * [misc]simplify:  iters left: 5 (58 enodes)
* * [misc]simplify:  iters left: 4 (133 enodes)
* * [misc]simplify:  iters left: 3 (344 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (* (/ U J) 1/2) (* (/ U J) 1/2)) 1)))))
* * * * [misc]progress:  [ 66 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))
* * [misc]simplify:  iters left: 6 (35 enodes)
* * [misc]simplify:  iters left: 5 (74 enodes)
* * [misc]simplify:  iters left: 4 (171 enodes)
* [exit]simplify:  Simplified to (* (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (sqrt (sqrt (+ 1 (pow (exp 2) (- (log (/ 1/2 (cos (* 1/2 K)))) (- (log J) (log U))))))))
* * * * [misc]progress:  [ 67 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))))
* * [misc]simplify:  iters left: 6 (36 enodes)
* * [misc]simplify:  iters left: 5 (73 enodes)
* * [misc]simplify:  iters left: 4 (170 enodes)
* [exit]simplify:  Simplified to (* (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (sqrt (sqrt (+ 1 (pow (exp 2) (+ (log (/ 1/2 (cos (* K 1/2)))) (- (log (/ -1 J)) (log (/ -1 U)))))))))
* * * * [misc]progress:  [ 68 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (30 enodes)
* * [misc]simplify:  iters left: 5 (58 enodes)
* * [misc]simplify:  iters left: 4 (133 enodes)
* * [misc]simplify:  iters left: 3 (334 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (* (sqrt (sqrt (+ (* (* (/ 1/2 J) U) (* (/ 1/2 J) U)) 1))) (* (* J -2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 69 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (35 enodes)
* * [misc]simplify:  iters left: 5 (74 enodes)
* * [misc]simplify:  iters left: 4 (171 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (sqrt (+ 1 (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))))) (* (* J -2) (cos (/ K 2)))) (sqrt (sqrt (+ 1 (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U))))))))
* * * * [misc]progress:  [ 70 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (36 enodes)
* * [misc]simplify:  iters left: 5 (73 enodes)
* * [misc]simplify:  iters left: 4 (170 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ (pow (exp 2) (- (log (/ 1/2 (cos (* 1/2 K)))) (- (log (/ -1 U)) (log (/ -1 J))))) 1))) (* (sqrt (sqrt (+ 1 (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))))) (* (* J -2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 71 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/4)))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/4))
* * [misc]simplify:  iters left: 6 (30 enodes)
* * [misc]simplify:  iters left: 5 (58 enodes)
* * [misc]simplify:  iters left: 4 (133 enodes)
* * [misc]simplify:  iters left: 3 (344 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* (* J -2) (cos (/ K 2))) (pow (+ (* (* (/ U J) 1/2) (* (/ U J) 1/2)) 1) 1/4)))
* * * * [misc]progress:  [ 72 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/4)))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/4))
* * [misc]simplify:  iters left: 6 (35 enodes)
* * [misc]simplify:  iters left: 5 (74 enodes)
* * [misc]simplify:  iters left: 4 (171 enodes)
* [exit]simplify:  Simplified to (* (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (pow (+ 1 (pow (exp 2) (- (log (/ 1/2 (cos (* 1/2 K)))) (- (log J) (log U))))) 1/4))
* * * * [misc]progress:  [ 73 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/4)))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/4))
* * [misc]simplify:  iters left: 6 (36 enodes)
* * [misc]simplify:  iters left: 5 (73 enodes)
* * [misc]simplify:  iters left: 4 (170 enodes)
* [exit]simplify:  Simplified to (* (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (pow (+ 1 (pow (exp 2) (+ (log (/ 1/2 (cos (* K 1/2)))) (- (log (/ -1 J)) (log (/ -1 U)))))) 1/4))
* * * * [misc]progress:  [ 74 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/4)) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/4)) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (30 enodes)
* * [misc]simplify:  iters left: 5 (58 enodes)
* * [misc]simplify:  iters left: 4 (133 enodes)
* * [misc]simplify:  iters left: 3 (334 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (* (pow (+ (* (* (/ 1/2 J) U) (* (/ 1/2 J) U)) 1) 1/4) (* (* J -2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 75 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/4)) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/4)) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (35 enodes)
* * [misc]simplify:  iters left: 5 (74 enodes)
* * [misc]simplify:  iters left: 4 (171 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (sqrt (+ 1 (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))))) (* (* J -2) (cos (/ K 2)))) (pow (+ 1 (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U))))) 1/4))
* * * * [misc]progress:  [ 76 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/4)) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (cos (/ K 2))) (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/4)) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (36 enodes)
* * [misc]simplify:  iters left: 5 (73 enodes)
* * [misc]simplify:  iters left: 4 (170 enodes)
* [exit]simplify:  Simplified to (* (pow (+ (pow (exp 2) (- (log (/ 1/2 (cos (* 1/2 K)))) (- (log (/ -1 U)) (log (/ -1 J))))) 1) 1/4) (* (sqrt (sqrt (+ 1 (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))))) (* (* J -2) (cos (/ K 2)))))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 4 / 4
* * * [misc]progress:  picking best candidate
* [misc]none:  Fresh alts: 3
* [misc]none:  All alts: 3
* [misc]none:  Non-fresh alt: (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* [misc]none:  Non-fresh alt: (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* [misc]none:  Fresh alt: (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* [misc]none:  Non-fresh alt: (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* [misc]none:  Fresh alt: (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* [misc]none:  Fresh alt: (λ (J K U) (cbrt (* (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))))
* [misc]none:  Fresh alt indexes
* [misc]none:  (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 0
* [misc]none:  (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 1
* [misc]none:  (λ (J K U) (cbrt (* (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))): 2
* [misc]none:  Best fresh alt per point
* [misc]none:  (1.8269212298308998e+214 1789977963981.046 -1.7899154283931006e-62): 1
* [misc]none:  (1.6281717766697912e+39 3.5243641367880456e+86 -3.0008256032154172e-176): 2
* [misc]none:  (-7.986330642950897e-117 1.1611754700502491e-55 8.728226238434233e-64): 0
* [misc]none:  (-1.6133455999823373e+110 -3.9890484917100117e+257 -1.5117832743647305e-21): 0
* [misc]none:  (3.928924306566786e-70 5.222760300460367e-180 -4.026134204708055e+160): 0
* [misc]none:  (2.281413649637054e-166 4.156243175149629e-181 -9.231874857928986e-255): 0
* [misc]none:  (-1.65054043818576e-39 -1.0058709145515093e+290 -4.753699147196455e-118): 0
* [misc]none:  (-4.805584106456354e-282 -0.15058815983267834 3.714800492587865e+85): 0
* [misc]none:  (-4.7089063680709754e+260 4.344802098601123e-298 4.508329239962989e+257): 0
* [misc]none:  (-1.211264682641895e-292 1.0495684746531957e+167 2.721003254105153e-81): 0
* [misc]none:  (-3.0671153252781823e-63 -7.74362334743424e+32 -2.2376851712564295e-118): 0
* [misc]none:  (1.64239269831532e+149 -1.576948173228613e+33 9.680698928511806e-32): 0
* [misc]none:  (1.954959341132994e-252 -7.83347153590065e-06 5.521334390623478e-06): 0
* [misc]none:  (-3.229654932887624e+201 -9.827696191097834e-18 -1.3343140776153144e-304): 1
* [misc]none:  (-9.906575581428813e+195 7.10957194421701e+200 -4.7756557550151386e+160): 1
* [misc]none:  (2.4256946179069016e+78 6.207394963032113e+30 -7.218692088264328e+54): 1
* [misc]none:  (8.781920275794267e+61 3.5618749791650757e+87 4.9372470656494625e-201): 2
* [misc]none:  (1.4446355009900792e+23 -3.5082856951249954e-122 9.917487178181935e-54): 2
* [misc]none:  (-7.01049497494046e-138 3.841494064694043e+276 3.642806409692576e+70): 0
* [misc]none:  (-3.326243684234595e+241 -7.587678445119084e+247 1.518078533135906e+61): 0
* [misc]none:  (1.5052438492777668e+214 1.5460201380138582e-108 6.354924490516637e-174): 0
* [misc]none:  (1.1935837539207151e+36 -1.6901036379481523e+68 5.558607723763576e+296): 0
* [misc]none:  (-5129.844514220037 -8.518839978003416e+199 5.0618502549145104e+216): 0
* [misc]none:  (-2.0899529309308688e-173 -1.3078423091955545e+95 8.726419779901594e-156): 1
* [misc]none:  (1.5484790382727637e+258 2.2758369496030736e+44 2.7646272679971947e+138): 0
* [misc]none:  (1.8029164814151534e-305 -8.140052952226443e-29 -3.868827374468717e+273): 0
* [misc]none:  (-9.30868828487235e-242 7.865810923274834e+251 -1.977339157633397e-22): 0
* [misc]none:  (-12396.634829186376 2.0737883409435182e-60 8.938208620266642e-81): 1
* [misc]none:  (-1.0125994980022202e+121 9.949795070357293e-13 3.9753155304068916e+192): 0
* [misc]none:  (-1.5751944823937151e-208 -5.711690539427335e-292 2.0698086438592394e+99): 0
* [misc]none:  (8.149794087375897e+77 1.4399038101240658e-157 -0.0033935472374883513): 2
* [misc]none:  (-1.873060887288803e+204 6.486236446634097e-143 -6.777569686362558e+23): 1
* [misc]none:  (-3.976258322985434e+241 1.0713666056080785e-84 -1.4481584190101499e-109): 0
* [misc]none:  (1.8890847145741933e+54 5.334416108525731e+103 8.243928876632343e+120): 0
* [misc]none:  (4.915746009665795e+153 -1.2716911445748643e-294 -1.178199525484178e+291): 0
* [misc]none:  (-2.616452914461827e+123 -1.3552545859518693e-149 1.0769411808120101e+237): 1
* [misc]none:  (2.7212207505395135e+138 -1.7192030807828345e+260 -3.070590530502344e+254): 0
* [misc]none:  (4.3361011341035273e+108 -7.078347720981057e+296 -1.1633032638785635e+290): 0
* [misc]none:  (-2.3832835734274537e-77 -2.0550237535049573e-58 3.3652051120813564e-167): 0
* [misc]none:  (-1.6071108269264857e+240 2.2507296241296892e-278 -8.625502649886978e-116): 1
* [misc]none:  (-7.605291673043568e+86 1.3555181915244097e+58 5.535572593369702e+234): 1
* [misc]none:  (1.1281253812481777e-05 -7.875416682732296e+153 2.953059473116585e-77): 2
* [misc]none:  (-1.7943678282584236e+305 -8.253144371362014e+269 1.6962188327979892e+156): 1
* [misc]none:  (-3.0357430466827192e+202 7.526837789610841e+223 -1.0160940285787676e+119): 0
* [misc]none:  (6.853656747763464e-298 1.5907488733120222e-68 -4.474252265840201e+73): 0
* [misc]none:  (1.3833425279814779e+61 -4.807303049624254e-15 1.8641906072853124e-122): 0
* [misc]none:  (-3.0274687809727364e-300 7.50358512361513e-69 1.5464847509065313e+116): 0
* [misc]none:  (-7.218711869488973e-243 -587327855578134.2 -3.1846212263600816e-18): 0
* [misc]none:  (4.242186305736945e+277 7.288958178428041e-256 5.409384226193089e+76): 0
* [misc]none:  (-2.319372457341872e-287 4.187380162585325e-193 -1.32843112383632e+222): 0
* [misc]none:  (-1.1299275128362188e+120 6.659322155044152e+223 -2.5903554766194963e+287): 0
* [misc]none:  (-7.84381588726745e-44 3.9248553939523704e-204 -2.4810437085982083e-110): 1
* [misc]none:  (2.623583837461381e+148 -4.810065069789271e-38 1.6579472731822137e+209): 0
* [misc]none:  (7.148125858281279e-128 -1.1410424941898917e-307 -7.884101440606108e+43): 0
* [misc]none:  (3.2782900783384907e+260 1.2654023023741973e+87 5.3297020297971135e-251): 0
* [misc]none:  (4.360233270161975e+69 -1.2973858626691246e+248 -1.3038350073216301e+175): 1
* [misc]none:  (6.186245288104366e-177 4.0009214940503626e-296 -3.1670246594447204e-244): 0
* [misc]none:  (-4.944977315465704e+134 3.7946864491882027e-174 7.967379897939584e-266): 1
* [misc]none:  (5.338353252944482e+295 2.475773952907049e-271 5.261531518469373e-290): 0
* [misc]none:  (2.555657911489638e+100 2.1545947154827896e+229 2.6209188754640728e+107): 0
* [misc]none:  (1.0367654190214238e+155 7.510167254913154e-75 -1.879438806525893e-17): 0
* [misc]none:  (-2.2458375637103902e-132 -9.791675790911144e+50 5.462119320563526e+16): 0
* [misc]none:  (-7.461408405072584e-11 2.819362408294866e+247 5.576422555370537e+229): 0
* [misc]none:  (-1.2634592988240547e+184 -2.046312445248254e+167 -2.5768688170454604e-166): 1
* [misc]none:  (-2.3695265370701153e-160 5.627370989949808e+102 -1.1307817728525e-192): 1
* [misc]none:  (2.729599448498006e-142 1.268161462925599e-223 1.8558602765266175e+154): 0
* [misc]none:  (8.010626774664954e-118 3.197294045188449e-213 -3.8061627632242695e+220): 0
* [misc]none:  (1.4601547257514377e-37 6.851358071879168e+277 -1.4026731237337527e+299): 0
* [misc]none:  (1.2309532522175715e-227 5.849070875002102e-168 -1.8322924530722165e+176): 0
* [misc]none:  (2.6481468427206757e-89 1.8304705420573128e+300 5.162437418074754e-216): 1
* [misc]none:  (5.884862647618943e+102 1.3917287586797797e+215 -1.9484215729108895e+208): 0
* [misc]none:  (2.7534373406057187e+274 -6.754823491493555e-24 -2.4266153803656513e-110): 0
* [misc]none:  (2.802805856656922e+299 3267744482859.4893 -2.125403821003621e+259): 0
* [misc]none:  (-5.821161027096475e-49 4.3906960513010925e-288 9.735553079850294e-195): 1
* [misc]none:  (-2.4642361000377723e+179 -223338690.5739434 2.617385806499904e-208): 0
* [misc]none:  (6.454193966659965e-12 1.2843486366644783e+218 1.6598105327534946e+245): 0
* [misc]none:  (-2.2565106546246065e+111 -8.921793657844595e+241 -1.2504926677350782e+286): 0
* [misc]none:  (2142884768423.9766 -1.0342577969053837e-127 1.1325567110922881e-222): 0
* [misc]none:  (6.352964037059704e-48 2.0675888684205106e-37 3.9955309460256863e-193): 2
* [misc]none:  (-6.802352065741283e-237 1.7860466700053246e+179 -2.1540953112813662e-178): 0
* [misc]none:  (-1.1984894069610523e-255 2.286904329311883e+176 -3.0869297245392077e+307): 0
* [misc]none:  (-7.242911167116891e-28 -3.652961257321153e+269 -1.981435962910265e-248): 1
* [misc]none:  (1.434478809327731e-162 1.7673263201240207e+200 4.1358060479750856e+163): 0
* [misc]none:  (2.77377213114978e+181 -2.5233739143143128e-166 7.0699594918945535e-177): 0
* [misc]none:  (1.5437232098269186e+160 -5.1984298768145166e+116 -1.2768311469464077e-95): 1
* [misc]none:  (-4.0802892718556596e+97 -4.502005664483894e-90 -1.3669353810280968e+130): 1
* [misc]none:  (3.5925206879521377e-169 -1.3877894503805502e+162 3.851639943546658e-220): 1
* [misc]none:  (7.262940842293714e+141 2.5169641752150834e-130 -2.4010908942747236e-247): 0
* [misc]none:  (1.5786239562667337e+192 -1.646250865837071e-08 -4.6981533625942616e-48): 0
* [misc]none:  (-1.3666403621362786e-250 1175954691713314.2 1.6505576250215693e+254): 0
* [misc]none:  (-8.454483141733306e+289 3.2999709724191907e-111 -6.317430000587058e+24): 0
* [misc]none:  (-4.671984247068368e+114 -2.9619260441588295e+211 -7.22878673519174e-279): 0
* [misc]none:  (-3.759430214395936e-120 -1.445629235880647e+140 2.1262474173228004e+275): 0
* [misc]none:  (2.0609285567281652e-241 1.9640202737101926e+158 4.0355590295024944e+30): 0
* [misc]none:  (-3.1297081963080297e-242 8.94051254019841e+73 -1.0418876601412776e+158): 0
* [misc]none:  (1.334212127520659e-194 2.3042294780211474e+199 -0.1449571473562267): 0
* [misc]none:  (-1.322393042309631e-287 331.0762921520269 2.486727752761897e+186): 0
* [misc]none:  (6.1692613790114145e-176 3.16347551928874e-213 -1.999009223927216e-112): 0
* [misc]none:  (1.6628640493696272e+86 -1.5025592441357432e-91 1.526533864556896e-136): 0
* [misc]none:  (-1.1590427293178154e-110 2.3621708607435707e+306 -2.12081898299509e-251): 1
* [misc]none:  (-4.444969967255464e-50 -7.309457855467372e+172 -5.496412463214942e+159): 0
* [misc]none:  (-1.4721600470373534e-29 3.795139234164696e-109 9.806701774277626e-103): 0
* [misc]none:  (-3.123985774571585e+305 4.3713778543032466e+80 9.77689775396416e+270): 0
* [misc]none:  (-3.9142022803361806e-187 -5.65740503188699e+260 5.701436151254667e-51): 0
* [misc]none:  (-4.0509904466518765e-37 -6.2678543781187986e-158 2.6870891996869854e+222): 0
* [misc]none:  (1.403842517343178e+239 -4.523272375047282e+19 -3.133147621079016e+299): 0
* [misc]none:  (-3.1263201082196465e-277 4.562606033317646e+142 2.1157410136365666e+27): 0
* [misc]none:  (1.7344997138936077e-42 -3.913559470208424e-83 -2.9867969528063676e+265): 0
* [misc]none:  (3.0173777232564683e+257 1.4365336082533024e-65 7.3222795686052666e+50): 0
* [misc]none:  (-9.290387573799883e-227 2.1939039916199917e-151 6.704445560737266e-185): 1
* [misc]none:  (-9.568307378321542e-67 3.826389705571192e+305 3.2252529629473372e-164): 2
* [misc]none:  (-1.7144787029551547e-76 1945731255459.47 3.4149900413992998e-118): 2
* [misc]none:  (-3.9457481405050707e-140 -3.8831186001124554e+177 3.9566905915205435e+222): 0
* [misc]none:  (-4.045276803805828e+248 2.0407374713985817e-67 6.798712177335776e+112): 1
* [misc]none:  (-1.7506244038659656e+155 -5.551664099930396e+287 1.622208144463601e-166): 0
* [misc]none:  (-8.556050344850203e+96 -7.922576985868201e-83 2.1548182655933656e-147): 1
* [misc]none:  (-1.7889344297298395e-138 8.336613082028674e+83 -5.612374503803972e+191): 0
* [misc]none:  (2.208377572236396e-264 1.625924245506842e+101 3.6974324674576528e-196): 0
* [misc]none:  (1.194352601301008e+170 -1.2990710049317618e+149 -7.565112997028972e+159): 0
* [misc]none:  (1.1658351917668372e+172 1.3349160645071676e+249 2.931040211928409e-256): 1
* [misc]none:  (-2.439121548558237e-263 7.971191617216227e+278 -5.16988167177608e+53): 0
* [misc]none:  (2.6969709464868204e+192 -3.288801652693557e-126 -1.1724467728438874e+62): 0
* [misc]none:  (2.4787821728961726e-208 -4.583226060750687e+286 4.5505475745463453e+70): 0
* [misc]none:  (-4.7627047558420924e-178 9.818158704343799e+98 1.0173157545581e-152): 1
* [misc]none:  (-5.541734639256592e-158 6.582912119010719e-154 -2.7755596952545536e+214): 0
* [misc]none:  (-6.937852684341488e-17 -3.509811603569984e-162 1.0023146616707945e-196): 0
* [misc]none:  (-1.102805383752407e+91 -1.1833316978686804e-196 -2.074828050091204e+43): 1
* [misc]none:  (-1.6730371273659853e+134 7.03833207774333e+15 -1.3239959970038969e+98): 0
* [misc]none:  (4.1286963732031184e-303 -5.2489676640999375e-37 1.37725435443438e-133): 0
* [misc]none:  (2.7744697188841963e+109 -6.937438758466827e-192 -3.3253159094181508e+99): 0
* [misc]none:  (1.3198936947099211e-96 -1.5451834902703197e-42 -1.7726057829102443e-75): 2
* [misc]none:  (2.332651968655402e-142 -1.0504139891547427e+112 1.714387790028798e+53): 0
* [misc]none:  (1.0835466360416472e+257 2.2433259629035416e-110 4.4964231441929855e-212): 0
* [misc]none:  (-1.1740030617157484e-279 -1.2604014885172566e-16 -3.533444382159577e+294): 0
* [misc]none:  (4.163796059008999e+263 9.568517745632325e+214 2.9372247799245325e+93): 1
* [misc]none:  (3.280888101399023e-178 2.4645417753990825e-46 1.1531681692158285e+126): 0
* [misc]none:  (-2.094542504845539e+96 3.658887962688304e-221 -8.114819311899108e-200): 2
* [misc]none:  (-3.106463349287814e-283 -3194.11813336966 3.8921610463731365e-84): 0
* [misc]none:  (-8.851204171241843e+281 -9.262519032529967e-34 -1.785130886221006e+231): 1
* [misc]none:  (5.244418714777191e-247 -1.1047298144911661e-128 -3.806792758567173e-77): 0
* [misc]none:  (8.483535156875368e-302 -1.345613125533753e+279 -1.8508777881935605e+151): 0
* [misc]none:  (-0.0006673038257262197 2.8621091346925045e-294 1.532108192832722e+128): 1
* [misc]none:  (-5.0502610074661083e+207 3.789685423350582e-08 -1.2565837085170136e-39): 0
* [misc]none:  (1.762534146009323e+140 -1.0334310654904308e-302 6.545384967014291e-225): 0
* [misc]none:  (9.107018310586045e+54 -2.971342031183356e+89 -1.6718446752859893e+111): 0
* [misc]none:  (4.918436108504659e-301 -2.0718283319643413e+202 -1.6194758145392415e-55): 0
* [misc]none:  (1.6691081971097037e+94 -7.498270199484197e+128 2.7394548302027227e-88): 0
* [misc]none:  (-3.8474489635359294e+91 3.118009484335783e-104 -5.8304170084179074e-46): 1
* [misc]none:  (-2.67503022703027e-297 -2.5128760687731143e+95 8995869217554.457): 0
* [misc]none:  (-1.9632140373363783e+122 1.2420866124564814e-293 6.3461851602547e-177): 1
* [misc]none:  (-3.432853067516309e-246 2.0914477614867384e-227 2.01314860958205e-179): 1
* [misc]none:  (4.1821161712206335e+98 -1.06513481701701e-107 -4.126212717690705e-129): 0
* [misc]none:  (-6.0258374336189325e+121 1.241885419647938e+111 3.5248326356674874e-60): 0
* [misc]none:  (-185563564389128.0 -3.2505753217846565e-280 -3.802991462899128e-34): 1
* [misc]none:  (2.5937923840174148e+191 2.0634010725481968e+279 -6.71288738518563e+35): 0
* [misc]none:  (-1.3468517163131261e+272 3.7544706354148685e+249 -5.537735150627702e+213): 1
* [misc]none:  (1.740072246435861e-207 1.3636559368742825e-149 1.946944651699716e-139): 0
* [misc]none:  (6.333153678225876e-68 8.70336562916574e-216 7.84549397492709e+169): 0
* [misc]none:  (6363.313367940982 -1.977991260671615e-272 7.762114448443534e+255): 0
* [misc]none:  (1.682179526351612e+60 1.3399459123824423e-08 -2.0088395627297287e+293): 0
* [misc]none:  (-2.0811417072211844e+239 -2.4464470346425223e-307 6.330170018440137e-77): 1
* [misc]none:  (6.04623429007003e-242 -4.345326241698038e-278 5.823432666941199e+232): 0
* [misc]none:  (-3.1969871529936574e+166 3.226368417375545e+273 3.982342803919231e-46): 1
* [misc]none:  (-1.1442254260677068e-38 -1.1682833194119885e+290 1.7119636201650242e-68): 2
* [misc]none:  (5.22304174043592e-158 -3.807000870050907e+58 -1.6925574577510237e+214): 0
* [misc]none:  (8.377477023109926e-106 2.3080855823624493e-299 4.50326449267665e+246): 0
* [misc]none:  (1.0100264902476595e-152 6.2370208452565505e-251 -1.3788511600691207e+143): 0
* [misc]none:  (-9.563665845262864e+134 -4.34857343156037e+281 6.2285928439400495e+156): 1
* [misc]none:  (0.002518103001908201 2.819308104709626e+146 -4.0300440872978227e-184): 2
* [misc]none:  (1.4105181521169557e+85 -2.665217209595492e+188 3.5241094689699846e+143): 0
* [misc]none:  (4.19388438569828e-183 3.636662419716013e-100 -1.2948317804463169e-282): 0
* [misc]none:  (-2.8090151520671207e+163 2.984404923140836e-249 5.437516292888218e-268): 1
* [misc]none:  (5.520248382898629e-230 6.71342285975285e-63 -3.464947738442053e-155): 0
* [misc]none:  (4.004060788521414e+101 5.679811834757315e+283 -6.473810795939257e+164): 1
* [misc]none:  (3.588388254213374e-229 -1139547812.809111 4.890275917515567e-08): 0
* [misc]none:  (-5.005096670380054e+47 -1.1716631781329626e-278 2.3982589341782892e+126): 1
* [misc]none:  (-3.4998489762015864e-219 1.2430204782976187e-178 -1.9903644617661157e-253): 0
* [misc]none:  (-2.385315376938663e+253 1.6672558556111832e-132 -5.52786254698352e+123): 0
* [misc]none:  (-3.3129658515159495e+106 -2.2098708111796672e-198 -2.404284016476968e+279): 0
* [misc]none:  (1.233722688499856e-260 -3.5028343458937535e-90 5.227910927587319e+245): 0
* [misc]none:  (-63767.21419834566 -1.7606249358192524e+273 267950632.53292695): 1
* [misc]none:  (5.624641690736252e-214 8.322805913504859e+214 3.2616756987284277e-94): 1
* [misc]none:  (5.772678079688886e-193 -6.744341629118722e+132 6.954230926244437e-248): 0
* [misc]none:  (-8.888663579267588e+145 -1.2824561231119317e-43 -5.084319674250709e+292): 1
* [misc]none:  (1.2017614084255727e-118 2.163051204570009e+135 -9.483463323409894e+83): 0
* [misc]none:  (1.3207468552144425e-275 1.2439278636891217e+233 1.1524614864139226e-160): 0
* [misc]none:  (1.5181493189729785e-210 2.5055367778394023e+168 161620833577619.34): 0
* [misc]none:  (2.9543484210487e+68 -4.0220565746330086e+125 -1.6011896215578737e-278): 0
* [misc]none:  (-8.84696133260257e-277 1.0241174400059815e-119 -1.279384825639919e+218): 0
* [misc]none:  (-4.0734910927239613e+279 -2.2941123619407014e-42 -1.5101815541228603e-252): 0
* [misc]none:  (4.849304008883996e+136 -1.9158965524986357e+21 -1.0078494497283481e-63): 0
* [misc]none:  (-4.666260546447364e-94 7.089677021982108e+243 5.396180940081133e+274): 0
* [misc]none:  (-1.0374694539724338e-22 3.1474503815022313e+156 2.237363577109642e+74): 1
* [misc]none:  (1.6588937679962464e-112 3.192528639732453e+177 -5.90661572185385e+255): 0
* [misc]none:  (1.1908969294818754e-266 3.099784283699168e-174 -4.3665826438370466e+132): 0
* [misc]none:  (-1.0295936791749538e-299 -2.3878879079615316e+176 -2.7604299366199517e-300): 0
* [misc]none:  (-7.185580883046913e-107 -9.568148082725508e-90 -1.9577524593014605e+255): 0
* [misc]none:  (2.4666697643039057e+135 -9.953058197226308e-231 -1.6523309537219388e+292): 0
* [misc]none:  (1.4077992202573094e+157 -1.6969785717566782e-186 1.2222350343583978e+196): 0
* [misc]none:  (-1.4775843798497103e-226 1.13308848626096e-94 -1.0922245877481088e-202): 1
* [misc]none:  (4.042918419768235e-293 -3.2304680091420593e+273 -1.5418757249344543e-63): 0
* [misc]none:  (-1.5808149525401404e+250 3.027496459540811e+165 -1.2288638190895444e-91): 0
* [misc]none:  (-2.2214116445848722e-125 7.06806421332372e-195 -1.6177284163081556e-296): 1
* [misc]none:  (1.3558740031834803e-64 -9.115550998149062e+67 -4.7657636456813475e+188): 0
* [misc]none:  (6.054739181733751e+60 -3.7471130771905855e-70 -1.652280336936078e-182): 2
* [misc]none:  (-5.086606424901955e-26 -4.150888523033341e+56 2.5369593669384417e-158): 1
* [misc]none:  (4.1567543090652754e-33 -7.628468316635274e+118 -2.1412051815551306e+98): 2
* [misc]none:  (-7.67790351718318e-207 -1.1396663342585698e+185 -1.4047943834222912e+32): 0
* [misc]none:  (1.0167208681953543e+192 1.5933622570633916e-225 -8.205466933650709e-224): 0
* [misc]none:  (1.23513259853389e-199 -2.455637018443649e+26 -5.138936398971843e-75): 1
* [misc]none:  (4.3707194781987494e-97 -2.547315038123042e-87 3.4204094411255474e+115): 0
* [misc]none:  (31.114677989939693 2.800912164521124e-20 -3.2777951328230936e-29): 2
* [misc]none:  (-5.5773404803592965e+259 3.7931337372770976e-299 2.786772086490314e-60): 0
* [misc]none:  (-5.616681094429007e+40 3.096144630304459e-05 -3.1136499993102923e-28): 1
* [misc]none:  (2.1273566438007147e+264 2.075848018336343e+269 -1.6092812022702055e+27): 0
* [misc]none:  (-4.049616931519095e-12 5.231369250464457e+247 -8.701752776315519e+299): 0
* [misc]none:  (1.341667886706771e+115 3.8005266578165216e-258 -1.0098619973673771e+143): 0
* [misc]none:  (2.57846868660545e+128 1.8293764358985593e+179 -3.4049300239591715e+140): 0
* [misc]none:  (-3.2101962723934187e-96 7.417468591127432e+67 -3.877298803162118e-30): 1
* [misc]none:  (-1.8198742460941646e-81 -2.0820068164655182e+40 -7.236742688934569e+286): 0
* [misc]none:  (-8.323040591341415e+218 -4.677922974670643e+80 -6.692473243860769e+126): 0
* [misc]none:  (-1.9106041457506788e-63 3.747520792911468e+127 5.430483387973432e+258): 0
* [misc]none:  (2.2335992870926316e-153 1.4503417141831182e+51 2.0547294018965633e+61): 0
* [misc]none:  (7.852155885222424e-118 -2.8375357663701133e-215 6.513244922065764e-226): 0
* [misc]none:  (7.385144370900328e+173 -5.542636511154422e+167 7.908117764318118e+264): 1
* [misc]none:  (-2.441280553156046e-191 -8.5828334236211e+37 -1.0997158053453796e+52): 0
* [misc]none:  (6.819956828556854e+177 -3.987835231847739e-28 -1.3157971823804226e+26): 0
* [misc]none:  (3.2159945588434616e-06 5.306065123039819 -7.710049967444384e+140): 1
* [misc]none:  (9.03697438609635e-254 5.834916983599053e-288 -3.248874545341504e+57): 0
* [misc]none:  (-4.693794485448123e+266 -1.0182917238227828e-268 7.874050663202412e-138): 1
* [misc]none:  (-2.9961253346398193e-277 -4.2324566784967944e-196 -6.824787913341571e-74): 0
* [misc]none:  (8.573472507341022e+41 -3.1598975960421508e+277 -3.3169741611569367e+305): 0
* [misc]none:  (1.4410801258605738e+62 106537.6777769988 -2.6159166493367154e-235): 2
* [misc]none:  (-2.576894021693856e-173 -4.230280825094585e+83 8.062228390339164e-110): 1
* [misc]none:  (-1.8358840832683498e+44 -2.156801537654526e+36 -3.512703779155646e-87): 2
* [misc]none:  (-6.846939373244303e+227 2.125743593675342e+150 -3.1982664100230636e+83): 0
* [misc]none:  (-6.253340869605864e+291 1.4031893252788157e-130 -2.4878548514423325e+131): 0
* [misc]none:  (4.547656836966103e-26 -9.296466940750938e-169 2.3403140268290895e-220): 2
* [misc]none:  (-5.094827374807951e+22 -3.0047845617322243e+245 3.456521015844278e-267): 0
* [misc]none:  (5.548340076310199e-111 -5.686069957565031e-220 -4.479806301623672e-178): 0
* [misc]none:  (-2.3266982566628708e-73 -4.924557161248151e-49 2.0491433117473444e+251): 0
* [misc]none:  (2.1868710093441635e-94 -2.9110234445746466e+124 4.292734438749543e-07): 0
* [misc]none:  (-1.3160349663332311e-291 -1.0651455859079758e-283 4.626894916535224e-128): 0
* [misc]none:  (1.114170127871121e+259 8.453366577306196e-160 -8.935111048608571e-173): 0
* [misc]none:  (-5.548866558621532e-09 0.0019265340891290363 2.5107596839002617e-188): 1
* [misc]none:  (-2715439348210.3716 3.8364962842018573e-131 -8.310532646005735e-88): 1
* [misc]none:  (9.373070312843732e-91 -1.3476877676941842e+188 -1.1445296297917484e+276): 0
* [misc]none:  (-2.854465274914285e+95 1.5238038259281467e+97 -2.9771655786075137e-170): 2
* [misc]none:  (1.011727234239232e-268 5.76823955439101e-249 -2.0681820259142047e+203): 0
* [misc]none:  (-5.358736018951544e-210 -3.780049011953038e-263 -7.356146101163064e-142): 1
* [misc]none:  (-4.679560768974975e-224 -1.7581458633759795e+76 -2.615425031816684e-28): 0
* [misc]none:  (9.00969948519257e+300 -4.472004514616723e-118 2.4547241600019345e+232): 0
* [misc]none:  (7.022076711242115e-133 -7.904392031638281e+133 -5.94028418794007e+211): 0
* [misc]none:  (-9.328298623753299e+123 -1.0504234320141073e+133 2.943249346534323e+144): 1
* [misc]none:  (-5.6215764598070664e+281 7.885146171822741e-252 4.254787401710164e+249): 1
* [misc]none:  (1.376461838305041e-44 1.1351952620028756e+104 4.887341950722903e-119): 1
* [misc]none:  All alt indexes
* [misc]none:  (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 0
* [misc]none:  (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))): 1
* [misc]none:  (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 2
* [misc]none:  (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 3
* [misc]none:  (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))): 4
* [misc]none:  (λ (J K U) (cbrt (* (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))): 5
* [misc]none:  Best alt per point
* [misc]none:  (1.8269212298308998e+214 1789977963981.046 -1.7899154283931006e-62): 0
* [misc]none:  (1.6281717766697912e+39 3.5243641367880456e+86 -3.0008256032154172e-176): 0
* [misc]none:  (-7.986330642950897e-117 1.1611754700502491e-55 8.728226238434233e-64): 0
* [misc]none:  (-1.6133455999823373e+110 -3.9890484917100117e+257 -1.5117832743647305e-21): 0
* [misc]none:  (3.928924306566786e-70 5.222760300460367e-180 -4.026134204708055e+160): 0
* [misc]none:  (2.281413649637054e-166 4.156243175149629e-181 -9.231874857928986e-255): 0
* [misc]none:  (-1.65054043818576e-39 -1.0058709145515093e+290 -4.753699147196455e-118): 0
* [misc]none:  (-4.805584106456354e-282 -0.15058815983267834 3.714800492587865e+85): 0
* [misc]none:  (-4.7089063680709754e+260 4.344802098601123e-298 4.508329239962989e+257): 0
* [misc]none:  (-1.211264682641895e-292 1.0495684746531957e+167 2.721003254105153e-81): 0
* [misc]none:  (-3.0671153252781823e-63 -7.74362334743424e+32 -2.2376851712564295e-118): 0
* [misc]none:  (1.64239269831532e+149 -1.576948173228613e+33 9.680698928511806e-32): 0
* [misc]none:  (1.954959341132994e-252 -7.83347153590065e-06 5.521334390623478e-06): 0
* [misc]none:  (-3.229654932887624e+201 -9.827696191097834e-18 -1.3343140776153144e-304): 0
* [misc]none:  (-9.906575581428813e+195 7.10957194421701e+200 -4.7756557550151386e+160): 0
* [misc]none:  (2.4256946179069016e+78 6.207394963032113e+30 -7.218692088264328e+54): 0
* [misc]none:  (8.781920275794267e+61 3.5618749791650757e+87 4.9372470656494625e-201): 0
* [misc]none:  (1.4446355009900792e+23 -3.5082856951249954e-122 9.917487178181935e-54): 0
* [misc]none:  (-7.01049497494046e-138 3.841494064694043e+276 3.642806409692576e+70): 0
* [misc]none:  (-3.326243684234595e+241 -7.587678445119084e+247 1.518078533135906e+61): 0
* [misc]none:  (1.5052438492777668e+214 1.5460201380138582e-108 6.354924490516637e-174): 0
* [misc]none:  (1.1935837539207151e+36 -1.6901036379481523e+68 5.558607723763576e+296): 0
* [misc]none:  (-5129.844514220037 -8.518839978003416e+199 5.0618502549145104e+216): 0
* [misc]none:  (-2.0899529309308688e-173 -1.3078423091955545e+95 8.726419779901594e-156): 0
* [misc]none:  (1.5484790382727637e+258 2.2758369496030736e+44 2.7646272679971947e+138): 0
* [misc]none:  (1.8029164814151534e-305 -8.140052952226443e-29 -3.868827374468717e+273): 0
* [misc]none:  (-9.30868828487235e-242 7.865810923274834e+251 -1.977339157633397e-22): 0
* [misc]none:  (-12396.634829186376 2.0737883409435182e-60 8.938208620266642e-81): 0
* [misc]none:  (-1.0125994980022202e+121 9.949795070357293e-13 3.9753155304068916e+192): 0
* [misc]none:  (-1.5751944823937151e-208 -5.711690539427335e-292 2.0698086438592394e+99): 0
* [misc]none:  (8.149794087375897e+77 1.4399038101240658e-157 -0.0033935472374883513): 0
* [misc]none:  (-1.873060887288803e+204 6.486236446634097e-143 -6.777569686362558e+23): 0
* [misc]none:  (-3.976258322985434e+241 1.0713666056080785e-84 -1.4481584190101499e-109): 0
* [misc]none:  (1.8890847145741933e+54 5.334416108525731e+103 8.243928876632343e+120): 0
* [misc]none:  (4.915746009665795e+153 -1.2716911445748643e-294 -1.178199525484178e+291): 0
* [misc]none:  (-2.616452914461827e+123 -1.3552545859518693e-149 1.0769411808120101e+237): 0
* [misc]none:  (2.7212207505395135e+138 -1.7192030807828345e+260 -3.070590530502344e+254): 1
* [misc]none:  (4.3361011341035273e+108 -7.078347720981057e+296 -1.1633032638785635e+290): 0
* [misc]none:  (-2.3832835734274537e-77 -2.0550237535049573e-58 3.3652051120813564e-167): 0
* [misc]none:  (-1.6071108269264857e+240 2.2507296241296892e-278 -8.625502649886978e-116): 0
* [misc]none:  (-7.605291673043568e+86 1.3555181915244097e+58 5.535572593369702e+234): 1
* [misc]none:  (1.1281253812481777e-05 -7.875416682732296e+153 2.953059473116585e-77): 0
* [misc]none:  (-1.7943678282584236e+305 -8.253144371362014e+269 1.6962188327979892e+156): 0
* [misc]none:  (-3.0357430466827192e+202 7.526837789610841e+223 -1.0160940285787676e+119): 0
* [misc]none:  (6.853656747763464e-298 1.5907488733120222e-68 -4.474252265840201e+73): 0
* [misc]none:  (1.3833425279814779e+61 -4.807303049624254e-15 1.8641906072853124e-122): 0
* [misc]none:  (-3.0274687809727364e-300 7.50358512361513e-69 1.5464847509065313e+116): 0
* [misc]none:  (-7.218711869488973e-243 -587327855578134.2 -3.1846212263600816e-18): 0
* [misc]none:  (4.242186305736945e+277 7.288958178428041e-256 5.409384226193089e+76): 0
* [misc]none:  (-2.319372457341872e-287 4.187380162585325e-193 -1.32843112383632e+222): 0
* [misc]none:  (-1.1299275128362188e+120 6.659322155044152e+223 -2.5903554766194963e+287): 0
* [misc]none:  (-7.84381588726745e-44 3.9248553939523704e-204 -2.4810437085982083e-110): 0
* [misc]none:  (2.623583837461381e+148 -4.810065069789271e-38 1.6579472731822137e+209): 0
* [misc]none:  (7.148125858281279e-128 -1.1410424941898917e-307 -7.884101440606108e+43): 0
* [misc]none:  (3.2782900783384907e+260 1.2654023023741973e+87 5.3297020297971135e-251): 2
* [misc]none:  (4.360233270161975e+69 -1.2973858626691246e+248 -1.3038350073216301e+175): 1
* [misc]none:  (6.186245288104366e-177 4.0009214940503626e-296 -3.1670246594447204e-244): 0
* [misc]none:  (-4.944977315465704e+134 3.7946864491882027e-174 7.967379897939584e-266): 0
* [misc]none:  (5.338353252944482e+295 2.475773952907049e-271 5.261531518469373e-290): 0
* [misc]none:  (2.555657911489638e+100 2.1545947154827896e+229 2.6209188754640728e+107): 0
* [misc]none:  (1.0367654190214238e+155 7.510167254913154e-75 -1.879438806525893e-17): 0
* [misc]none:  (-2.2458375637103902e-132 -9.791675790911144e+50 5.462119320563526e+16): 3
* [misc]none:  (-7.461408405072584e-11 2.819362408294866e+247 5.576422555370537e+229): 0
* [misc]none:  (-1.2634592988240547e+184 -2.046312445248254e+167 -2.5768688170454604e-166): 4
* [misc]none:  (-2.3695265370701153e-160 5.627370989949808e+102 -1.1307817728525e-192): 0
* [misc]none:  (2.729599448498006e-142 1.268161462925599e-223 1.8558602765266175e+154): 0
* [misc]none:  (8.010626774664954e-118 3.197294045188449e-213 -3.8061627632242695e+220): 0
* [misc]none:  (1.4601547257514377e-37 6.851358071879168e+277 -1.4026731237337527e+299): 0
* [misc]none:  (1.2309532522175715e-227 5.849070875002102e-168 -1.8322924530722165e+176): 0
* [misc]none:  (2.6481468427206757e-89 1.8304705420573128e+300 5.162437418074754e-216): 0
* [misc]none:  (5.884862647618943e+102 1.3917287586797797e+215 -1.9484215729108895e+208): 1
* [misc]none:  (2.7534373406057187e+274 -6.754823491493555e-24 -2.4266153803656513e-110): 0
* [misc]none:  (2.802805856656922e+299 3267744482859.4893 -2.125403821003621e+259): 0
* [misc]none:  (-5.821161027096475e-49 4.3906960513010925e-288 9.735553079850294e-195): 0
* [misc]none:  (-2.4642361000377723e+179 -223338690.5739434 2.617385806499904e-208): 0
* [misc]none:  (6.454193966659965e-12 1.2843486366644783e+218 1.6598105327534946e+245): 0
* [misc]none:  (-2.2565106546246065e+111 -8.921793657844595e+241 -1.2504926677350782e+286): 0
* [misc]none:  (2142884768423.9766 -1.0342577969053837e-127 1.1325567110922881e-222): 0
* [misc]none:  (6.352964037059704e-48 2.0675888684205106e-37 3.9955309460256863e-193): 0
* [misc]none:  (-6.802352065741283e-237 1.7860466700053246e+179 -2.1540953112813662e-178): 0
* [misc]none:  (-1.1984894069610523e-255 2.286904329311883e+176 -3.0869297245392077e+307): 0
* [misc]none:  (-7.242911167116891e-28 -3.652961257321153e+269 -1.981435962910265e-248): 4
* [misc]none:  (1.434478809327731e-162 1.7673263201240207e+200 4.1358060479750856e+163): 0
* [misc]none:  (2.77377213114978e+181 -2.5233739143143128e-166 7.0699594918945535e-177): 0
* [misc]none:  (1.5437232098269186e+160 -5.1984298768145166e+116 -1.2768311469464077e-95): 0
* [misc]none:  (-4.0802892718556596e+97 -4.502005664483894e-90 -1.3669353810280968e+130): 3
* [misc]none:  (3.5925206879521377e-169 -1.3877894503805502e+162 3.851639943546658e-220): 0
* [misc]none:  (7.262940842293714e+141 2.5169641752150834e-130 -2.4010908942747236e-247): 0
* [misc]none:  (1.5786239562667337e+192 -1.646250865837071e-08 -4.6981533625942616e-48): 0
* [misc]none:  (-1.3666403621362786e-250 1175954691713314.2 1.6505576250215693e+254): 0
* [misc]none:  (-8.454483141733306e+289 3.2999709724191907e-111 -6.317430000587058e+24): 0
* [misc]none:  (-4.671984247068368e+114 -2.9619260441588295e+211 -7.22878673519174e-279): 0
* [misc]none:  (-3.759430214395936e-120 -1.445629235880647e+140 2.1262474173228004e+275): 0
* [misc]none:  (2.0609285567281652e-241 1.9640202737101926e+158 4.0355590295024944e+30): 0
* [misc]none:  (-3.1297081963080297e-242 8.94051254019841e+73 -1.0418876601412776e+158): 0
* [misc]none:  (1.334212127520659e-194 2.3042294780211474e+199 -0.1449571473562267): 0
* [misc]none:  (-1.322393042309631e-287 331.0762921520269 2.486727752761897e+186): 0
* [misc]none:  (6.1692613790114145e-176 3.16347551928874e-213 -1.999009223927216e-112): 0
* [misc]none:  (1.6628640493696272e+86 -1.5025592441357432e-91 1.526533864556896e-136): 0
* [misc]none:  (-1.1590427293178154e-110 2.3621708607435707e+306 -2.12081898299509e-251): 0
* [misc]none:  (-4.444969967255464e-50 -7.309457855467372e+172 -5.496412463214942e+159): 0
* [misc]none:  (-1.4721600470373534e-29 3.795139234164696e-109 9.806701774277626e-103): 0
* [misc]none:  (-3.123985774571585e+305 4.3713778543032466e+80 9.77689775396416e+270): 0
* [misc]none:  (-3.9142022803361806e-187 -5.65740503188699e+260 5.701436151254667e-51): 1
* [misc]none:  (-4.0509904466518765e-37 -6.2678543781187986e-158 2.6870891996869854e+222): 0
* [misc]none:  (1.403842517343178e+239 -4.523272375047282e+19 -3.133147621079016e+299): 0
* [misc]none:  (-3.1263201082196465e-277 4.562606033317646e+142 2.1157410136365666e+27): 0
* [misc]none:  (1.7344997138936077e-42 -3.913559470208424e-83 -2.9867969528063676e+265): 0
* [misc]none:  (3.0173777232564683e+257 1.4365336082533024e-65 7.3222795686052666e+50): 0
* [misc]none:  (-9.290387573799883e-227 2.1939039916199917e-151 6.704445560737266e-185): 0
* [misc]none:  (-9.568307378321542e-67 3.826389705571192e+305 3.2252529629473372e-164): 0
* [misc]none:  (-1.7144787029551547e-76 1945731255459.47 3.4149900413992998e-118): 0
* [misc]none:  (-3.9457481405050707e-140 -3.8831186001124554e+177 3.9566905915205435e+222): 0
* [misc]none:  (-4.045276803805828e+248 2.0407374713985817e-67 6.798712177335776e+112): 0
* [misc]none:  (-1.7506244038659656e+155 -5.551664099930396e+287 1.622208144463601e-166): 0
* [misc]none:  (-8.556050344850203e+96 -7.922576985868201e-83 2.1548182655933656e-147): 0
* [misc]none:  (-1.7889344297298395e-138 8.336613082028674e+83 -5.612374503803972e+191): 0
* [misc]none:  (2.208377572236396e-264 1.625924245506842e+101 3.6974324674576528e-196): 1
* [misc]none:  (1.194352601301008e+170 -1.2990710049317618e+149 -7.565112997028972e+159): 0
* [misc]none:  (1.1658351917668372e+172 1.3349160645071676e+249 2.931040211928409e-256): 0
* [misc]none:  (-2.439121548558237e-263 7.971191617216227e+278 -5.16988167177608e+53): 0
* [misc]none:  (2.6969709464868204e+192 -3.288801652693557e-126 -1.1724467728438874e+62): 0
* [misc]none:  (2.4787821728961726e-208 -4.583226060750687e+286 4.5505475745463453e+70): 0
* [misc]none:  (-4.7627047558420924e-178 9.818158704343799e+98 1.0173157545581e-152): 0
* [misc]none:  (-5.541734639256592e-158 6.582912119010719e-154 -2.7755596952545536e+214): 0
* [misc]none:  (-6.937852684341488e-17 -3.509811603569984e-162 1.0023146616707945e-196): 0
* [misc]none:  (-1.102805383752407e+91 -1.1833316978686804e-196 -2.074828050091204e+43): 0
* [misc]none:  (-1.6730371273659853e+134 7.03833207774333e+15 -1.3239959970038969e+98): 0
* [misc]none:  (4.1286963732031184e-303 -5.2489676640999375e-37 1.37725435443438e-133): 0
* [misc]none:  (2.7744697188841963e+109 -6.937438758466827e-192 -3.3253159094181508e+99): 0
* [misc]none:  (1.3198936947099211e-96 -1.5451834902703197e-42 -1.7726057829102443e-75): 3
* [misc]none:  (2.332651968655402e-142 -1.0504139891547427e+112 1.714387790028798e+53): 0
* [misc]none:  (1.0835466360416472e+257 2.2433259629035416e-110 4.4964231441929855e-212): 0
* [misc]none:  (-1.1740030617157484e-279 -1.2604014885172566e-16 -3.533444382159577e+294): 0
* [misc]none:  (4.163796059008999e+263 9.568517745632325e+214 2.9372247799245325e+93): 0
* [misc]none:  (3.280888101399023e-178 2.4645417753990825e-46 1.1531681692158285e+126): 0
* [misc]none:  (-2.094542504845539e+96 3.658887962688304e-221 -8.114819311899108e-200): 0
* [misc]none:  (-3.106463349287814e-283 -3194.11813336966 3.8921610463731365e-84): 0
* [misc]none:  (-8.851204171241843e+281 -9.262519032529967e-34 -1.785130886221006e+231): 0
* [misc]none:  (5.244418714777191e-247 -1.1047298144911661e-128 -3.806792758567173e-77): 0
* [misc]none:  (8.483535156875368e-302 -1.345613125533753e+279 -1.8508777881935605e+151): 0
* [misc]none:  (-0.0006673038257262197 2.8621091346925045e-294 1.532108192832722e+128): 0
* [misc]none:  (-5.0502610074661083e+207 3.789685423350582e-08 -1.2565837085170136e-39): 0
* [misc]none:  (1.762534146009323e+140 -1.0334310654904308e-302 6.545384967014291e-225): 0
* [misc]none:  (9.107018310586045e+54 -2.971342031183356e+89 -1.6718446752859893e+111): 0
* [misc]none:  (4.918436108504659e-301 -2.0718283319643413e+202 -1.6194758145392415e-55): 0
* [misc]none:  (1.6691081971097037e+94 -7.498270199484197e+128 2.7394548302027227e-88): 0
* [misc]none:  (-3.8474489635359294e+91 3.118009484335783e-104 -5.8304170084179074e-46): 0
* [misc]none:  (-2.67503022703027e-297 -2.5128760687731143e+95 8995869217554.457): 0
* [misc]none:  (-1.9632140373363783e+122 1.2420866124564814e-293 6.3461851602547e-177): 0
* [misc]none:  (-3.432853067516309e-246 2.0914477614867384e-227 2.01314860958205e-179): 0
* [misc]none:  (4.1821161712206335e+98 -1.06513481701701e-107 -4.126212717690705e-129): 0
* [misc]none:  (-6.0258374336189325e+121 1.241885419647938e+111 3.5248326356674874e-60): 0
* [misc]none:  (-185563564389128.0 -3.2505753217846565e-280 -3.802991462899128e-34): 0
* [misc]none:  (2.5937923840174148e+191 2.0634010725481968e+279 -6.71288738518563e+35): 0
* [misc]none:  (-1.3468517163131261e+272 3.7544706354148685e+249 -5.537735150627702e+213): 0
* [misc]none:  (1.740072246435861e-207 1.3636559368742825e-149 1.946944651699716e-139): 0
* [misc]none:  (6.333153678225876e-68 8.70336562916574e-216 7.84549397492709e+169): 0
* [misc]none:  (6363.313367940982 -1.977991260671615e-272 7.762114448443534e+255): 0
* [misc]none:  (1.682179526351612e+60 1.3399459123824423e-08 -2.0088395627297287e+293): 0
* [misc]none:  (-2.0811417072211844e+239 -2.4464470346425223e-307 6.330170018440137e-77): 0
* [misc]none:  (6.04623429007003e-242 -4.345326241698038e-278 5.823432666941199e+232): 0
* [misc]none:  (-3.1969871529936574e+166 3.226368417375545e+273 3.982342803919231e-46): 0
* [misc]none:  (-1.1442254260677068e-38 -1.1682833194119885e+290 1.7119636201650242e-68): 0
* [misc]none:  (5.22304174043592e-158 -3.807000870050907e+58 -1.6925574577510237e+214): 0
* [misc]none:  (8.377477023109926e-106 2.3080855823624493e-299 4.50326449267665e+246): 0
* [misc]none:  (1.0100264902476595e-152 6.2370208452565505e-251 -1.3788511600691207e+143): 0
* [misc]none:  (-9.563665845262864e+134 -4.34857343156037e+281 6.2285928439400495e+156): 1
* [misc]none:  (0.002518103001908201 2.819308104709626e+146 -4.0300440872978227e-184): 0
* [misc]none:  (1.4105181521169557e+85 -2.665217209595492e+188 3.5241094689699846e+143): 1
* [misc]none:  (4.19388438569828e-183 3.636662419716013e-100 -1.2948317804463169e-282): 0
* [misc]none:  (-2.8090151520671207e+163 2.984404923140836e-249 5.437516292888218e-268): 0
* [misc]none:  (5.520248382898629e-230 6.71342285975285e-63 -3.464947738442053e-155): 0
* [misc]none:  (4.004060788521414e+101 5.679811834757315e+283 -6.473810795939257e+164): 0
* [misc]none:  (3.588388254213374e-229 -1139547812.809111 4.890275917515567e-08): 0
* [misc]none:  (-5.005096670380054e+47 -1.1716631781329626e-278 2.3982589341782892e+126): 0
* [misc]none:  (-3.4998489762015864e-219 1.2430204782976187e-178 -1.9903644617661157e-253): 0
* [misc]none:  (-2.385315376938663e+253 1.6672558556111832e-132 -5.52786254698352e+123): 0
* [misc]none:  (-3.3129658515159495e+106 -2.2098708111796672e-198 -2.404284016476968e+279): 0
* [misc]none:  (1.233722688499856e-260 -3.5028343458937535e-90 5.227910927587319e+245): 0
* [misc]none:  (-63767.21419834566 -1.7606249358192524e+273 267950632.53292695): 1
* [misc]none:  (5.624641690736252e-214 8.322805913504859e+214 3.2616756987284277e-94): 1
* [misc]none:  (5.772678079688886e-193 -6.744341629118722e+132 6.954230926244437e-248): 0
* [misc]none:  (-8.888663579267588e+145 -1.2824561231119317e-43 -5.084319674250709e+292): 0
* [misc]none:  (1.2017614084255727e-118 2.163051204570009e+135 -9.483463323409894e+83): 0
* [misc]none:  (1.3207468552144425e-275 1.2439278636891217e+233 1.1524614864139226e-160): 0
* [misc]none:  (1.5181493189729785e-210 2.5055367778394023e+168 161620833577619.34): 0
* [misc]none:  (2.9543484210487e+68 -4.0220565746330086e+125 -1.6011896215578737e-278): 0
* [misc]none:  (-8.84696133260257e-277 1.0241174400059815e-119 -1.279384825639919e+218): 0
* [misc]none:  (-4.0734910927239613e+279 -2.2941123619407014e-42 -1.5101815541228603e-252): 0
* [misc]none:  (4.849304008883996e+136 -1.9158965524986357e+21 -1.0078494497283481e-63): 2
* [misc]none:  (-4.666260546447364e-94 7.089677021982108e+243 5.396180940081133e+274): 0
* [misc]none:  (-1.0374694539724338e-22 3.1474503815022313e+156 2.237363577109642e+74): 4
* [misc]none:  (1.6588937679962464e-112 3.192528639732453e+177 -5.90661572185385e+255): 0
* [misc]none:  (1.1908969294818754e-266 3.099784283699168e-174 -4.3665826438370466e+132): 0
* [misc]none:  (-1.0295936791749538e-299 -2.3878879079615316e+176 -2.7604299366199517e-300): 0
* [misc]none:  (-7.185580883046913e-107 -9.568148082725508e-90 -1.9577524593014605e+255): 0
* [misc]none:  (2.4666697643039057e+135 -9.953058197226308e-231 -1.6523309537219388e+292): 0
* [misc]none:  (1.4077992202573094e+157 -1.6969785717566782e-186 1.2222350343583978e+196): 0
* [misc]none:  (-1.4775843798497103e-226 1.13308848626096e-94 -1.0922245877481088e-202): 0
* [misc]none:  (4.042918419768235e-293 -3.2304680091420593e+273 -1.5418757249344543e-63): 0
* [misc]none:  (-1.5808149525401404e+250 3.027496459540811e+165 -1.2288638190895444e-91): 0
* [misc]none:  (-2.2214116445848722e-125 7.06806421332372e-195 -1.6177284163081556e-296): 0
* [misc]none:  (1.3558740031834803e-64 -9.115550998149062e+67 -4.7657636456813475e+188): 0
* [misc]none:  (6.054739181733751e+60 -3.7471130771905855e-70 -1.652280336936078e-182): 0
* [misc]none:  (-5.086606424901955e-26 -4.150888523033341e+56 2.5369593669384417e-158): 0
* [misc]none:  (4.1567543090652754e-33 -7.628468316635274e+118 -2.1412051815551306e+98): 0
* [misc]none:  (-7.67790351718318e-207 -1.1396663342585698e+185 -1.4047943834222912e+32): 0
* [misc]none:  (1.0167208681953543e+192 1.5933622570633916e-225 -8.205466933650709e-224): 0
* [misc]none:  (1.23513259853389e-199 -2.455637018443649e+26 -5.138936398971843e-75): 1
* [misc]none:  (4.3707194781987494e-97 -2.547315038123042e-87 3.4204094411255474e+115): 0
* [misc]none:  (31.114677989939693 2.800912164521124e-20 -3.2777951328230936e-29): 0
* [misc]none:  (-5.5773404803592965e+259 3.7931337372770976e-299 2.786772086490314e-60): 0
* [misc]none:  (-5.616681094429007e+40 3.096144630304459e-05 -3.1136499993102923e-28): 0
* [misc]none:  (2.1273566438007147e+264 2.075848018336343e+269 -1.6092812022702055e+27): 0
* [misc]none:  (-4.049616931519095e-12 5.231369250464457e+247 -8.701752776315519e+299): 0
* [misc]none:  (1.341667886706771e+115 3.8005266578165216e-258 -1.0098619973673771e+143): 0
* [misc]none:  (2.57846868660545e+128 1.8293764358985593e+179 -3.4049300239591715e+140): 1
* [misc]none:  (-3.2101962723934187e-96 7.417468591127432e+67 -3.877298803162118e-30): 0
* [misc]none:  (-1.8198742460941646e-81 -2.0820068164655182e+40 -7.236742688934569e+286): 0
* [misc]none:  (-8.323040591341415e+218 -4.677922974670643e+80 -6.692473243860769e+126): 0
* [misc]none:  (-1.9106041457506788e-63 3.747520792911468e+127 5.430483387973432e+258): 0
* [misc]none:  (2.2335992870926316e-153 1.4503417141831182e+51 2.0547294018965633e+61): 0
* [misc]none:  (7.852155885222424e-118 -2.8375357663701133e-215 6.513244922065764e-226): 0
* [misc]none:  (7.385144370900328e+173 -5.542636511154422e+167 7.908117764318118e+264): 1
* [misc]none:  (-2.441280553156046e-191 -8.5828334236211e+37 -1.0997158053453796e+52): 0
* [misc]none:  (6.819956828556854e+177 -3.987835231847739e-28 -1.3157971823804226e+26): 0
* [misc]none:  (3.2159945588434616e-06 5.306065123039819 -7.710049967444384e+140): 0
* [misc]none:  (9.03697438609635e-254 5.834916983599053e-288 -3.248874545341504e+57): 0
* [misc]none:  (-4.693794485448123e+266 -1.0182917238227828e-268 7.874050663202412e-138): 0
* [misc]none:  (-2.9961253346398193e-277 -4.2324566784967944e-196 -6.824787913341571e-74): 0
* [misc]none:  (8.573472507341022e+41 -3.1598975960421508e+277 -3.3169741611569367e+305): 0
* [misc]none:  (1.4410801258605738e+62 106537.6777769988 -2.6159166493367154e-235): 5
* [misc]none:  (-2.576894021693856e-173 -4.230280825094585e+83 8.062228390339164e-110): 1
* [misc]none:  (-1.8358840832683498e+44 -2.156801537654526e+36 -3.512703779155646e-87): 0
* [misc]none:  (-6.846939373244303e+227 2.125743593675342e+150 -3.1982664100230636e+83): 0
* [misc]none:  (-6.253340869605864e+291 1.4031893252788157e-130 -2.4878548514423325e+131): 0
* [misc]none:  (4.547656836966103e-26 -9.296466940750938e-169 2.3403140268290895e-220): 0
* [misc]none:  (-5.094827374807951e+22 -3.0047845617322243e+245 3.456521015844278e-267): 0
* [misc]none:  (5.548340076310199e-111 -5.686069957565031e-220 -4.479806301623672e-178): 0
* [misc]none:  (-2.3266982566628708e-73 -4.924557161248151e-49 2.0491433117473444e+251): 0
* [misc]none:  (2.1868710093441635e-94 -2.9110234445746466e+124 4.292734438749543e-07): 0
* [misc]none:  (-1.3160349663332311e-291 -1.0651455859079758e-283 4.626894916535224e-128): 0
* [misc]none:  (1.114170127871121e+259 8.453366577306196e-160 -8.935111048608571e-173): 0
* [misc]none:  (-5.548866558621532e-09 0.0019265340891290363 2.5107596839002617e-188): 0
* [misc]none:  (-2715439348210.3716 3.8364962842018573e-131 -8.310532646005735e-88): 0
* [misc]none:  (9.373070312843732e-91 -1.3476877676941842e+188 -1.1445296297917484e+276): 0
* [misc]none:  (-2.854465274914285e+95 1.5238038259281467e+97 -2.9771655786075137e-170): 5
* [misc]none:  (1.011727234239232e-268 5.76823955439101e-249 -2.0681820259142047e+203): 0
* [misc]none:  (-5.358736018951544e-210 -3.780049011953038e-263 -7.356146101163064e-142): 0
* [misc]none:  (-4.679560768974975e-224 -1.7581458633759795e+76 -2.615425031816684e-28): 0
* [misc]none:  (9.00969948519257e+300 -4.472004514616723e-118 2.4547241600019345e+232): 0
* [misc]none:  (7.022076711242115e-133 -7.904392031638281e+133 -5.94028418794007e+211): 0
* [misc]none:  (-9.328298623753299e+123 -1.0504234320141073e+133 2.943249346534323e+144): 0
* [misc]none:  (-5.6215764598070664e+281 7.885146171822741e-252 4.254787401710164e+249): 0
* [misc]none:  (1.376461838305041e-44 1.1351952620028756e+104 4.887341950722903e-119): 0
* [misc]none:  Picked alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]pick:  Picked  #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2 1 2)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 1 2 1 2)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 1 1 1 2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 2 1)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2 1 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (* 1/2 K)) J))) in 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]backup-simplify:  Simplify (log (/ 1/2 (cos (* 1/2 K)))) into (log (/ 1/2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (/ 1/2 (cos (* 1/2 K))))) into (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (+ (log U) (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))) into (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) into (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) into (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (+ (* (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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log U) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) into (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/2 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))
* [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 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (* 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (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 J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (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 (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 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 (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2 1 2 1 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (* 1/2 K)) J))) in 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]backup-simplify:  Simplify (log (/ 1/2 (cos (* 1/2 K)))) into (log (/ 1/2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (/ 1/2 (cos (* 1/2 K))))) into (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (+ (log U) (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))) into (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) into (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) into (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (+ (* (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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log U) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) into (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/2 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))
* [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 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (* 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (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 J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (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 (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 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 (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 1 1 1 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (* 1/2 K)) J))) in 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]backup-simplify:  Simplify (log (/ 1/2 (cos (* 1/2 K)))) into (log (/ 1/2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (/ 1/2 (cos (* 1/2 K))))) into (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (+ (log U) (- (log (/ 1/2 (cos (* 1/2 K)))) (log J))) into (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) into (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) into (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (+ (* (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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log U) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) into (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/2 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))
* [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 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (* 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (* 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) into (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (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 J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (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 (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) into (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (- (log U))) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 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 (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 2 1)
* [misc]approximate:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 J) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (* 1/2 K)) J))) into (log (/ 1/2 (* (cos (* 1/2 K)) J)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))) into (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))))) into (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (* 1/2 K)) J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log (/ 1/2 (* (cos (* 1/2 K)) J)))) into (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 J) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U J))) into (log (* 1/2 (/ U J)))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ U J)))) into (* 2 (log (* 1/2 (/ U J))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ U J))))) into (pow (* 1/2 (/ U J)) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ U 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 (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U J)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ U J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ U J))))) (+ (* (/ (pow 0 1) 1)))) 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 (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ U (* (* 2 J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ U (* (* 2 J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ 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 in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* -2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (* 0 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 1) (* 0 0)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (cos (* 1/2 K)))) into (- (* 2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* (- (* 2 (cos (* 1/2 K)))) (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))))))) into (- (* 2 (* (cos (* 1/2 K)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (* (cos (* 1/2 K)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (* 1/2 K)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) 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)) (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ U (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ U (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 (/ U (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (/ U 1) into U
* [misc]backup-simplify:  Simplify (* 1/2 U) into (* 1/2 U)
* [misc]backup-simplify:  Simplify (log (* 1/2 U)) into (log (* 1/2 U))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (log (* 1/2 U)) (- (log J))) into (- (log (* 1/2 U)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 U)) (log J))) into (* 2 (- (log (* 1/2 U)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 U)) (log J)))) into (exp (* 2 (- (log (* 1/2 U)) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1) into (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* U (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 U) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 U)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 U)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* 1 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))
* [misc]backup-simplify:  Simplify (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))) into (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))
* [misc]backup-simplify:  Simplify (- (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) into (- (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (- (log (* 1/2 U)) (log J)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (- (log (* 1/2 U)) (log J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 U)) (log J)) in U
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 U)) in U
* [misc]taylor:  Taking taylor expansion of (* 1/2 U) 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 U in U
* [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 (log 1/2) into (log 1/2)
* [misc]taylor:  Taking taylor expansion of (log J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log U)) (log 1/2)) into (+ (log U) (log 1/2))
* [misc]backup-simplify:  Simplify (- (log J)) into (- (log J))
* [misc]backup-simplify:  Simplify (+ (+ (log U) (log 1/2)) (- (log J))) into (- (+ (log U) (log 1/2)) (log J))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log U) (log 1/2)) (log J))) into (* 2 (- (+ (log U) (log 1/2)) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) into (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))) into (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) into (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/2 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log U) (log 1/2)) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))) into (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (- (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into (- (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))))
* [misc]backup-simplify:  Simplify (- (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (- (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))) (* 0 (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (* 1/2 (/ U (cos (* 1/2 K)))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log 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 (+ (* -2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* (- (* 2 (cos (* 1/2 K)))) 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 U)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (- (* 2 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) (* 1 (* 1 J))) into (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) J))
* [misc]approximate:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ 1/2 K)) U)))) into (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 2)) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ 1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* -2 1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 K))) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) 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)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ 1/2 K)) U))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ 1/2 K)) U)) 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)) U) 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 U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) U) into (* (cos (/ 1/2 K)) U)
* [misc]backup-simplify:  Simplify (/ 1/2 (* (cos (/ 1/2 K)) U)) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ 1/2 K)) U))) into (log (/ 1/2 (* (cos (/ 1/2 K)) U)))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ 1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* (cos (/ 1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) into (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) 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)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) 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 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)) in U
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ 1/2 K)) U))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ 1/2 K)) U)) 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 (* (cos (/ 1/2 K)) U) 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 U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (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 (- (/ 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)) 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]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (/ 1/2 (cos (/ 1/2 K))))) into (- (log (/ 1/2 (cos (/ 1/2 K)))) (log U))
* [misc]backup-simplify:  Simplify (+ (- (log (/ 1/2 (cos (/ 1/2 K)))) (log U)) (log J)) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) into (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) into (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 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 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)) (* 0 (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* 2 (cos (/ 1/2 K))))) (* 0 (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ 1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (+ (* 0 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 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 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 U))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ 1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (* (cos (/ 1/2 K)) U))) (* 0 (/ 0 (* (cos (/ 1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ 1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow J 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow J 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (* (cos (/ 1/2 (/ 1 K))) (sqrt (+ (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) 1)))) (* 1 (* 1 (/ 1 (/ 1 J))))) into (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))
* [misc]approximate:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))
* [misc]backup-simplify:  Simplify (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 2)
* [misc]backup-simplify:  Simplify (+ 1 (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))))) (+ (* (/ (pow 0 1) 1)))) 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 (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (/ (/ 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)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* -2 -1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 K))) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) 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 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ -1/2 K)) U))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ -1/2 K)) U)) 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)) U) 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 U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) U) into (* (cos (/ -1/2 K)) U)
* [misc]backup-simplify:  Simplify (/ 1/2 (* (cos (/ -1/2 K)) U)) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* (cos (/ -1/2 K)) U))) into (log (/ 1/2 (* (cos (/ -1/2 K)) U)))
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) into (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ -1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) into (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) 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 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)) in U
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (* (cos (/ -1/2 K)) U))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* (cos (/ -1/2 K)) U)) 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 (* (cos (/ -1/2 K)) U) 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 U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (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 (- (/ 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)) 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]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (/ 1/2 (cos (/ -1/2 K))))) into (- (log (/ 1/2 (cos (/ -1/2 K)))) (log U))
* [misc]backup-simplify:  Simplify (+ (- (log (/ 1/2 (cos (/ -1/2 K)))) (log U)) (log J)) into (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))
* [misc]backup-simplify:  Simplify (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))) into (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U))))) into (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)) into (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 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]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) into (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- 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 (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))) (* 0 (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (* (cos (/ -1/2 K)) U)))) into (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log 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) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (+ (* 0 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 U))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* (cos (/ -1/2 K)) U)) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* (cos (/ -1/2 K)) U))) (* 0 (/ 0 (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (* (cos (/ -1/2 K)) U)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow J 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow J 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (* (cos (/ -1/2 (/ 1 (- K)))) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K)))))) (log (/ 1 (- J)))) (log (/ 1 (- U)))))) 1)))) (* 1 (* 1 (/ 1 (/ 1 (- J)))))) into (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))) (* (cos (* 1/2 K)) J)))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2)))))>
* * * * [misc]progress:  [ 2 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1)))))>
* * * * [misc]progress:  [ 3 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 4 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 5 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 6 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (55 enodes)
* * [misc]simplify:  iters left: 3 (131 enodes)
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 7 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 8 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 9 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (101 enodes)
* * [misc]simplify:  iters left: 2 (324 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 10 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (202 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [enter]simplify:  Simplifying (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (90 enodes)
* * [misc]simplify:  iters left: 3 (337 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 11 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (187 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [enter]simplify:  Simplifying (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (127 enodes)
* * [misc]simplify:  iters left: 2 (484 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 12 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 13 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 14 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 15 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2)))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 16 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1)))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 17 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 18 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 19 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 20 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (55 enodes)
* * [misc]simplify:  iters left: 3 (131 enodes)
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 21 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 22 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 23 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [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 (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (101 enodes)
* * [misc]simplify:  iters left: 2 (324 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 24 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (202 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [enter]simplify:  Simplifying (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (90 enodes)
* * [misc]simplify:  iters left: 3 (337 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 25 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (187 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [enter]simplify:  Simplifying (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (127 enodes)
* * [misc]simplify:  iters left: 2 (484 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 26 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 27 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 28 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 29 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 30 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 31 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 32 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 33 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 34 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (55 enodes)
* * [misc]simplify:  iters left: 3 (131 enodes)
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 35 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 36 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 37 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [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 (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (101 enodes)
* * [misc]simplify:  iters left: 2 (324 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* [exit]simplify:  Simplified to (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 38 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (202 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [exit]simplify:  Simplified to (sqrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [enter]simplify:  Simplifying (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (90 enodes)
* * [misc]simplify:  iters left: 3 (337 enodes)
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 39 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (187 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [enter]simplify:  Simplifying (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (127 enodes)
* * [misc]simplify:  iters left: 2 (484 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 40 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 41 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 42 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 43 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (pow (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (154 enodes)
* * [misc]simplify:  iters left: 2 (391 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 44 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (pow (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (154 enodes)
* * [misc]simplify:  iters left: 2 (391 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 45 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (pow (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1))))>
* * * * [misc]progress:  [ 46 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (exp (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (69 enodes)
* * [misc]simplify:  iters left: 3 (153 enodes)
* * [misc]simplify:  iters left: 2 (404 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (cos (/ K 2))) (log (* J -2))) (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (+ (+ (log (cos (/ K 2))) (log (* J -2))) (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 47 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (exp (+ (log (* (* -2 J) (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (+ (log (* (* -2 J) (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (68 enodes)
* * [misc]simplify:  iters left: 3 (154 enodes)
* * [misc]simplify:  iters left: 2 (401 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (log (* (* J -2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (log (* (* J -2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 48 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (exp (log (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (log (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (82 enodes)
* * [misc]simplify:  iters left: 3 (200 enodes)
* * [misc]simplify:  iters left: 2 (471 enodes)
* [exit]simplify:  Simplified to (log (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 49 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (log (exp (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (exp (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (79 enodes)
* * [misc]simplify:  iters left: 3 (166 enodes)
* * [misc]simplify:  iters left: 2 (407 enodes)
* [exit]simplify:  Simplified to (pow (pow (exp (* J -2)) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (pow (pow (exp (* J -2)) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 50 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (* (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (53 enodes)
* * [misc]simplify:  iters left: 4 (182 enodes)
* [exit]simplify:  Simplified to (* (+ (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2))))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (+ (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2))))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 51 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (* (* (* (* (* -2 J) (cos (/ K 2))) (* (* -2 J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* -2 J) (cos (/ K 2))) (* (* -2 J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (154 enodes)
* [exit]simplify:  Simplified to (* (+ (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (pow (* (* J -2) (cos (/ K 2))) 3)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (+ (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (pow (* (* J -2) (cos (/ K 2))) 3)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 52 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (35 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 (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [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 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 53 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (* (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (112 enodes)
* * [misc]simplify:  iters left: 3 (430 enodes)
* [exit]simplify:  Simplified to (* (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (pow (* (* J -2) (cos (/ K 2))) 3)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (pow (* (* J -2) (cos (/ K 2))) 3)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 54 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [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 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [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 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 55 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* 1 (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 56 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (83 enodes)
* * [misc]simplify:  iters left: 3 (207 enodes)
* * [misc]simplify:  iters left: 2 (478 enodes)
* [exit]simplify:  Simplified to (* (* (* (* J -2) (cos (/ K 2))) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (* (* (* J -2) (cos (/ K 2))) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 57 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (73 enodes)
* * [misc]simplify:  iters left: 3 (162 enodes)
* * [misc]simplify:  iters left: 2 (394 enodes)
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 58 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [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 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 59 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* (* -2 J) (cos (/ K 2))) (sqrt 1)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (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) (* J -2)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (* (sqrt 1) (* J -2)) (cos (/ K 2)))
* * * * [misc]progress:  [ 60 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [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 (155 enodes)
* * [misc]simplify:  iters left: 2 (388 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 61 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* (* -2 J) (cos (/ K 2))) 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (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)) (* J -2))
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (* J -2))
* * * * [misc]progress:  [ 62 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (326 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2)))
* * * * [misc]progress:  [ 63 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (/ (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (41 enodes)
* * [misc]simplify:  iters left: 4 (88 enodes)
* * [misc]simplify:  iters left: 3 (261 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (pow (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 3))) (* (* J -2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (pow (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 3))) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 64 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (/ (* (* (* -2 J) (cos (/ K 2))) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (81 enodes)
* * [misc]simplify:  iters left: 3 (250 enodes)
* [exit]simplify:  Simplified to (* (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))) (* (* J -2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))) (* (* J -2) (cos (/ K 2))))
* * * * [misc]progress:  [ 65 / 77 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (* (* -2 J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 66 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))))
* * [misc]simplify:  iters left: 6 (32 enodes)
* * [misc]simplify:  iters left: 5 (63 enodes)
* * [misc]simplify:  iters left: 4 (138 enodes)
* * [misc]simplify:  iters left: 3 (309 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ 1 (* (/ (* 1/2 U) J) (/ (* 1/2 U) J)))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))))
* * * * [misc]progress:  [ 67 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))))
* * [misc]simplify:  iters left: 6 (37 enodes)
* * [misc]simplify:  iters left: 5 (79 enodes)
* * [misc]simplify:  iters left: 4 (176 enodes)
* * [misc]simplify:  iters left: 3 (484 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (sqrt (+ 1 (* (* (/ 1/2 (cos (* K 1/2))) (* U (/ 1 J))) (* (/ 1/2 (cos (* K 1/2))) (* U (/ 1 J)))))) (* (* J -2) (cos (/ K 2))))) (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))))
* * * * [misc]progress:  [ 68 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))))))
* * [misc]simplify:  iters left: 6 (38 enodes)
* * [misc]simplify:  iters left: 5 (78 enodes)
* * [misc]simplify:  iters left: 4 (175 enodes)
* * [misc]simplify:  iters left: 3 (481 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))) (cbrt (* (sqrt (+ (* (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* 1/2 K)))) (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* 1/2 K))))) 1)) (* (* J -2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 69 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (32 enodes)
* * [misc]simplify:  iters left: 5 (63 enodes)
* * [misc]simplify:  iters left: 4 (139 enodes)
* * [misc]simplify:  iters left: 3 (308 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (sqrt (+ (* (* U (/ 1/2 J)) (* U (/ 1/2 J))) 1)) (* (* J -2) (cos (/ K 2))))) (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))))
* * * * [misc]progress:  [ 70 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (37 enodes)
* * [misc]simplify:  iters left: 5 (79 enodes)
* * [misc]simplify:  iters left: 4 (177 enodes)
* * [misc]simplify:  iters left: 3 (486 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ 1 (* (* (* (/ 1 J) U) (/ 1/2 (cos (* 1/2 K)))) (* (* (/ 1 J) U) (/ 1/2 (cos (* 1/2 K))))))))) (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))))
* * * * [misc]progress:  [ 71 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (38 enodes)
* * [misc]simplify:  iters left: 5 (77 enodes)
* * [misc]simplify:  iters left: 4 (174 enodes)
* * [misc]simplify:  iters left: 3 (481 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))) (cbrt (* (sqrt (+ 1 (* (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* K 1/2)))) (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* K 1/2))))))) (* (* J -2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 72 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (32 enodes)
* * [misc]simplify:  iters left: 5 (64 enodes)
* * [misc]simplify:  iters left: 4 (138 enodes)
* * [misc]simplify:  iters left: 3 (308 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* J -2) (cos (/ K 2))))) (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (* 1/2 U) J) (/ (* 1/2 U) J)) 1)))) (cbrt (* (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* J -2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 73 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (37 enodes)
* * [misc]simplify:  iters left: 5 (80 enodes)
* * [misc]simplify:  iters left: 4 (176 enodes)
* * [misc]simplify:  iters left: 3 (481 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (cbrt (* (sqrt (+ 1 (* (* (* (/ 1 J) U) (/ 1/2 (cos (* K 1/2)))) (* (* (/ 1 J) U) (/ 1/2 (cos (* K 1/2))))))) (* (* J -2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 74 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (38 enodes)
* * [misc]simplify:  iters left: 5 (79 enodes)
* * [misc]simplify:  iters left: 4 (175 enodes)
* * [misc]simplify:  iters left: 3 (485 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (* (/ 1/2 (cos (* 1/2 K))) (/ (/ -1 J) (/ -1 U))) (* (/ 1/2 (cos (* 1/2 K))) (/ (/ -1 J) (/ -1 U)))) 1)))) (* (cbrt (* (sqrt (+ 1 (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))))) (* (* J -2) (cos (/ K 2))))) (cbrt (* (sqrt (+ 1 (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))))) (* (* J -2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 75 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) J)))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) J))))
* * [misc]simplify:  iters left: 6 (33 enodes)
* * [misc]simplify:  iters left: 5 (65 enodes)
* * [misc]simplify:  iters left: 4 (130 enodes)
* * [misc]simplify:  iters left: 3 (277 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))) (cbrt (* (sqrt (+ 1 (* (* U (/ 1/2 J)) (* U (/ 1/2 J))))) (* J -2))))
* * * * [misc]progress:  [ 76 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))))))
* * [misc]simplify:  iters left: 6 (39 enodes)
* * [misc]simplify:  iters left: 5 (85 enodes)
* * [misc]simplify:  iters left: 4 (186 enodes)
* * [misc]simplify:  iters left: 3 (492 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))) (cbrt (* (sqrt (+ (* (* (* (/ 1 J) U) (/ 1/2 (cos (* 1/2 K)))) (* (* (/ 1 J) U) (/ 1/2 (cos (* 1/2 K))))) 1)) (* (* J -2) (cos (* 1/2 K))))))
* * * * [misc]progress:  [ 77 / 77 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))) (* (cos (* 1/2 K)) J))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* -2 (* (sqrt (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U))))))) (* (cos (* 1/2 K)) J)))))
* * [misc]simplify:  iters left: 6 (40 enodes)
* * [misc]simplify:  iters left: 5 (84 enodes)
* * [misc]simplify:  iters left: 4 (186 enodes)
* * [misc]simplify:  iters left: 3 (489 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))) (cbrt (* (* (cos (* 1/2 K)) (* J -2)) (sqrt (+ (* (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* 1/2 K)))) (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* 1/2 K))))) 1)))))
* * * [misc]progress:  adding candidates to table
* [misc]progress:  [Phase 3 of 3] Extracting.
* * [misc]regime-changes:  Finding splitpoints for: (#<alt-delta (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (* (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))> #<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 (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt-delta (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt-delta (λ (J K U) (cbrt (* (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))))>)
* [misc]regimes:  Found splitpoints: (#s(sp 0 J +nan.0)) , with alts (#<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>)
* [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 (25 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (+ (pow (/ U (* (* J 2) (cos (/ K 2)))) 2) 1)))
* * * * [misc]points:  Sampling 8000 additional inputs, on iter 0 have 0 / 8000
* * * * [misc]points:  Computing exacts on every 500 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 250 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 125 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 62 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 31 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 15 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 7 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 3 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts for 8000 points
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Filtering points with unrepresentable outputs
* * * * [misc]points:  Sampling 4 additional inputs, on iter 1 have 7998 / 8000
* * * * [misc]points:  Computing exacts for 4 points
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Filtering points with unrepresentable outputs
* * * * [exit]points:  Sampled 8002 points with exact outputs