* [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 indices
* [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:  (9.568527921939742e-273 2.654414227492494e+20 1.7090726067739176e-227): 0
* [misc]none:  (7.696162327562603e-152 -1.7235772956324157e+44 -1.849105607217708e-205): 0
* [misc]none:  (5.106850318067203e-223 -8.776422694060002e-191 -1.0339801069916732e-122): 0
* [misc]none:  (1.3381086996667414e-215 -1.2294460237484715e+92 -9.903617261398821e+48): 0
* [misc]none:  (1.0224180420716733e-52 -5.2868600650398754e+73 9.705038014433044e-175): 0
* [misc]none:  (-2.2377664482363495e-145 -6.863248801263982e-282 6.028770352690154e-151): 0
* [misc]none:  (-425.15997261130053 -1.4215485644178288e+122 6.224141164637054e+75): 0
* [misc]none:  (-1.2086624476009651e-200 2.3623052767393814e+153 4.4633600804799425e+142): 0
* [misc]none:  (-1.6813749551547664e-222 -4.6390246315423324e+36 1.2790861077923577e+68): 0
* [misc]none:  (1.0592112097552954e+143 -7.191398511280425e-59 -2.3255237224962407e-56): 0
* [misc]none:  (1.6780592368033288e-262 1.5331200777386884e+269 2.973444851318118e-169): 0
* [misc]none:  (1.6828576275377584e-98 4.5525663232975395e+86 4.922686678959719e-213): 0
* [misc]none:  (9.601043864442096e+176 5.752669291865014e-257 3.0310347416413137e-258): 0
* [misc]none:  (-1.1043473204259838e-123 -2.06284826271339e+143 -7.24722487096989e+250): 0
* [misc]none:  (-2.2793842908096357e+72 -8.124520965103743e+145 3.727663855470157e+254): 0
* [misc]none:  (8.775974517752829e+204 -644684.1881687096 -5.072621494700167e+267): 0
* [misc]none:  (-4.473451124127099e-235 1.5758037123807388e+87 -3.1154131766396667e+29): 0
* [misc]none:  (2.4492953260422185e+131 5.835395598392501e+198 -1.2951522948212234e+105): 0
* [misc]none:  (2.2545095115116114e+189 -1.4107789582096962e+111 -4.521345173807944e-274): 0
* [misc]none:  (2.4757193927168845e-307 -3.9546390943242443e-82 1.457018723838865e-35): 0
* [misc]none:  (-1.5246504675906286e-147 -1.1042460154015769e-187 -3.30379604621756e-180): 0
* [misc]none:  (-8.185062082112633e+221 9.424239481611678e-294 1.5096638452158614e-71): 0
* [misc]none:  (-1.830572871972773e-27 -1.714392276509888e-289 -9.870003932393336e-46): 0
* [misc]none:  (-2.2727962542731896e+253 6.967234360883543e-112 2.0770495361468835e+203): 0
* [misc]none:  (-3.5348879909542174e+259 3.1401318723071353e-131 -1.4852188300484065e-239): 0
* [misc]none:  (-3.374264737975756e+72 -1.0890756353988414e+102 0.228970627026966): 0
* [misc]none:  (8.40469635347052e+100 2.1321881547753267e-44 1.7739584018359304e-207): 0
* [misc]none:  (-2.723194185823719e-255 6.866799226360426e-109 6.417434319517234e+231): 0
* [misc]none:  (-1.105123941463264e-44 -1.5442050061781137e-296 -2.5125878605191734e-29): 0
* [misc]none:  (4.508352673437809e+248 -1.4801509312754967e-61 -5.163900824605852e+32): 0
* [misc]none:  (1.430295312965348e-149 3.112001531242655e+80 3.0475240801607222e-148): 0
* [misc]none:  (-5.232709143225968e-98 -2.6904647286120434e+306 -2.4014893155423993e+35): 0
* [misc]none:  (1.4966275592591335e-123 6.384545099874781e-168 -1.9863653303691194e-296): 0
* [misc]none:  (-1.5110806788081036e+47 4.232269734875141e-205 4.1020469956028986e+24): 0
* [misc]none:  (2.1703230086091624e+277 -4.725142043601307e-47 2.68866513359689e-174): 0
* [misc]none:  (8.96636707501737e-13 -2.3580830331388543e-23 1.6082525618587168e-259): 0
* [misc]none:  (2.7230496615379425e-188 7.15832835948139e-179 -3.386296042382532e-190): 0
* [misc]none:  (2.991170371343952e+151 -7.407998779781806e-33 -7.014935371531484e-98): 0
* [misc]none:  (-2.580522918977788e+184 8.990843056511833e-32 3.9088008390110404e+59): 0
* [misc]none:  (6.754325943853309e-283 -1.0323836290065946e-292 -1.1379474227414984e+157): 0
* [misc]none:  (-4.747329706134133e-300 -2.266131068741548e-232 6.354961149716869e-97): 0
* [misc]none:  (2.8293820765322485e-296 5.3887495676776976e+171 -503507.16469484643): 0
* [misc]none:  (-1.9250288775511552e-19 9.871143682146977e-239 -1.9809585244792104e-221): 0
* [misc]none:  (-5.324127388080003e+141 5.123849747663666e+133 4.007761912625816e-148): 0
* [misc]none:  (3.321054281872602e+251 -7.33347091133757e-103 -3.967500572333352e+95): 0
* [misc]none:  (-8.002576117532625e+293 -344.7442723289036 8.452539306620761e+219): 0
* [misc]none:  (-3.8897511496224356e+161 4.4485313287564445e+252 -2.9971297913067123e-296): 0
* [misc]none:  (1.120554825473697e-298 7.175557259725409e-49 4.4800031186106794e-70): 0
* [misc]none:  (-1.3609788364339258e+82 2.5265807746711182e-73 1.4440898226736705e-53): 0
* [misc]none:  (-4.651815532356965e+285 -1.223165056942955e+279 2.3912903471184356e-134): 0
* [misc]none:  (3.53511184703484e+158 -2.8955398952451435e+131 1.5780761566396397e+125): 0
* [misc]none:  (1.534059348183312e-189 2.8419420301747055e+90 -2.318158899615234e+28): 0
* [misc]none:  (8.976998414840432e+184 3.9122094377392414e+59 -6.588522440277298e+124): 0
* [misc]none:  (-8.890171102288788e+241 -4.517606044160453e-29 -2.0229301807644786e+90): 0
* [misc]none:  (4.588817619865515e-83 6.908716276621429e+42 1.074034252081928e-96): 0
* [misc]none:  (-2.0525626505030474e-205 1.43328810513268e+174 -3.517237475307537e+70): 0
* [misc]none:  (1.6570172448601563e-137 2.4048926517811354e+66 -1.2386076426807104e+281): 0
* [misc]none:  (4.0623211606609595e-228 1.5982222044177176e+181 8.398043771606399e+47): 0
* [misc]none:  (-6.552213310391902e+218 -2.461870212435176e+181 -9.04145577094214e-51): 0
* [misc]none:  (6.730955893129463e-197 6.724679859609688e-169 1.4230714989143866e-75): 0
* [misc]none:  (3.493084834288097e-125 -8.87002524437924e-05 -9.534297923953677e-238): 0
* [misc]none:  (8.932193317773552e+156 -4.82948997845691e+115 -2.844669102107347e+110): 0
* [misc]none:  (6.614130481633629e+300 -6.631482835790804e+75 -2.927893218629978e+198): 0
* [misc]none:  (-5.425958198218161e-146 -5.212281525360505e+119 1.3240207557849338e+291): 0
* [misc]none:  (-6.155236203506664e+276 3.2574885636926814e-211 -9.779940061204298e+60): 0
* [misc]none:  (1.3680169753287455e-53 -1.5172504298350683e-122 2.2957389429922706e-176): 0
* [misc]none:  (1.3610327499536486e+226 4.84788597345363e+32 1.0657402022625375e+129): 0
* [misc]none:  (-6.206729553564092e+301 1.7927880379985524e+252 -8.795577755360774e-193): 0
* [misc]none:  (1.0006462262322276e+238 -9.304691570184222e+30 1.9963004369674967e-80): 0
* [misc]none:  (1.4604179220567222e+231 1.5216315041338872e-218 1.6707151526371295e-190): 0
* [misc]none:  (5.1990169359560766e-256 -6.08679419260233e+77 -2.864119470500123e-178): 0
* [misc]none:  (-4.976800097081315e-07 8.044445972631143e-28 2.635030752287841e+186): 0
* [misc]none:  (4.12100928340286e-184 9.74865050931635e+298 -7.146083996729688e+199): 0
* [misc]none:  (8.361834195928021e-55 7.311006071291519e-101 -1.2254396192804965e-192): 0
* [misc]none:  (1.782256728493473e+35 6.657191501816709e+167 -1.0237963707243293e+257): 0
* [misc]none:  (-2.376464365888854e-78 -3.222114505301457e-163 -7.76766480776823e+37): 0
* [misc]none:  (8.382633428275648e-297 -6.191205901832185e+168 2.0703305241322436e+71): 0
* [misc]none:  (6.099737398723264e-279 2.6679523035634032e-104 8.366391802268445e+167): 0
* [misc]none:  (2.870509274337958e-101 -2.318802051809187e-21 -2.362056093523898e-236): 0
* [misc]none:  (4.384610242475067e+141 1.4474621781713568e+65 -1.410046620426318e-213): 0
* [misc]none:  (-4.423020421030483e+291 -3.178469867925502e-246 -7.447731371021966e+71): 0
* [misc]none:  (5.154503491655989e+241 -1.6398756117817188e+244 -5.198066934157678e+220): 0
* [misc]none:  (5.0588074473585105e-110 3.742291531299835e+250 5.013161881068948e+307): 0
* [misc]none:  (66089027839097.664 1.4351275309127672e-234 4.416557773834991e-25): 0
* [misc]none:  (-7.605311329977112e+177 3.0442880854679596e-31 -1.3989503218776358e-06): 0
* [misc]none:  (4.664141571059094e-118 -1.8512083623442292e+194 -1.3284106669669889e+173): 0
* [misc]none:  (1.0684729481870001e-64 6.3073426358942834e+75 -2.217199084242749e+17): 0
* [misc]none:  (3.1520683467019444e-71 0.19659739803111875 7.786539791485611e+181): 0
* [misc]none:  (2.4995037253728046e-268 -26830062846468156.0 4.637177905335891e-10): 0
* [misc]none:  (-12679727921.874447 8.652041834233969e-101 -3.577245999178336e-189): 0
* [misc]none:  (3.209451012414084e+270 3.7907433031673317e-256 8.76720870691781e-247): 0
* [misc]none:  (6.160331831501279e+241 -4.568727829143705e-23 -1.757665168464323e+292): 0
* [misc]none:  (-7.388307231162813e-47 3.4124175886179475e+199 3.0044088767799776e-30): 0
* [misc]none:  (4.7140908881238785e+103 2.3604863517900675e+30 6.476730028728146e-228): 0
* [misc]none:  (-1.2222609474395545e-52 3.369115258471057e+173 1.3383461391823352e+303): 0
* [misc]none:  (-2.6712990814490822e+247 2.3157792094796435e+174 -9.842315617180003e+283): 0
* [misc]none:  (-8.795626148255621e+120 -5.857596831984434e-95 4.097601147132013e-78): 0
* [misc]none:  (4.194634882433556e+107 -1.1526493241483084e+241 3.3390334975960143e-07): 0
* [misc]none:  (-1.8082167822566404e+183 2.2475155879831534e-92 -4.169290160322216e+246): 0
* [misc]none:  (1.030614327019319e-115 -3.2696794723802255e-27 1.8172920677413648e+103): 0
* [misc]none:  (-5.3218781381905035e-129 -2.362048596457182e+298 -6.16723792553022e+40): 0
* [misc]none:  (-2.40789942954366e+44 -2.9998533512328024e-144 -1.4147186694962813e-176): 0
* [misc]none:  (1.186346974675696e+155 -1.2827160692503531e+104 6.283729883572828e+84): 0
* [misc]none:  (3.6636765762957594e-187 1.7036347403091437e+117 9.645064592867311e+67): 0
* [misc]none:  (-5.1224941914889595e+118 1.3872947227834175e-251 7.12145855246931e-10): 0
* [misc]none:  (-4.3661371414490136e+281 -1.4301261995935981e+54 2.693461062117409e-112): 0
* [misc]none:  (1.6465279540530418e+78 2.43524332605807e-278 1.0576788912710565e-08): 0
* [misc]none:  (-17241.138101224224 4.764080499693186e-90 -7.290271346747531e-14): 0
* [misc]none:  (1.3557350350348342e+244 -1.3554385625614067e+48 -1.8946459759589086e-22): 0
* [misc]none:  (1.89639974853721e+92 8.2625435987749e+74 5.2790261762422465e+19): 0
* [misc]none:  (2.0179287053921742e+58 2.884705125857619e-274 2.031068672850261e-255): 0
* [misc]none:  (2.4294527094706238e+82 7.274711555473555e+146 1.5565784464325313e+71): 0
* [misc]none:  (1.2222184804619167e+37 -5.55277905008488e-191 -2.1360290498375943e+32): 0
* [misc]none:  (4.642568065399805e-260 -4.493058001076021e-21 -2.6740094065663153e+105): 0
* [misc]none:  (3.8347842435652736e+125 -9.848724265902522e+103 7.178809205583962e-175): 0
* [misc]none:  (-3.8059392134174312e-280 -3.954815085266754e+305 1.4235559851356953e-239): 0
* [misc]none:  (4.74667737826054e-29 -1.2486100740485319e+302 -143677164285.72263): 0
* [misc]none:  (-4.897389787642899e+104 1.868517529275615e+140 -2.5024214599876482e+172): 0
* [misc]none:  (1.5276944825842992e+272 2.1335024129380783e-97 1.0953112641111952e+229): 0
* [misc]none:  (3.2587696828142436e+75 -1.5310860302360472e-220 3.7735141958833343e+170): 0
* [misc]none:  (1.0233799517176219e-267 -9.329140131915071e-38 5.348181441205713e-277): 0
* [misc]none:  (-5.024170449312866e+115 -1.611431508373217e+195 2.6631876145177815e-299): 0
* [misc]none:  (-1.3496423811442664e+228 -6.4194246582119476e+212 -6.796944270882852e-34): 0
* [misc]none:  (1.4781375733319608e-242 -2.1294463337627754e-19 3.003847336951168e+42): 0
* [misc]none:  (1.6609596531041104e-183 -6.156933300042242e+249 -2.249022094261578e+256): 0
* [misc]none:  (-4.347828572616086e-184 -2.2415468254308968e-275 5.41731325733976e-115): 0
* [misc]none:  (1.0395093493101161e-28 -6.035695609668586e-193 5.540829799846932e-307): 0
* [misc]none:  (-6.2448878184443784e-195 8.949756960721031e-195 2.722605535602291e+155): 0
* [misc]none:  (-4.714069429956778e+287 2.9453252035345084e+174 -5.843713571039491e+54): 0
* [misc]none:  (1.0160216232612932e-143 -2.425692316345541e+35 -2.0645141541195737e-123): 0
* [misc]none:  (4.178563936936926e-127 2.1657839461347663e+307 6.629963208070179e-180): 0
* [misc]none:  (-7.809772272521888e+231 -1.0023220030653375e-143 2.5453262068352747e+307): 0
* [misc]none:  (-1.1570938550413644e-156 1.7005338626981419e-143 7.808994559121766e-111): 0
* [misc]none:  (8.788013174305029e-230 -2.708463803258993e-217 2.5557776305939374e+86): 0
* [misc]none:  (-7.843719408056975e+200 -5.36699847063349e-281 -5.474411714258796e-200): 0
* [misc]none:  (3.2454192740264175e-113 4.896551008070313e-307 1.2607016124581028e+98): 0
* [misc]none:  (-2.1121060804534514e-153 -3.946147066150504e-295 6.351701463874224e-34): 0
* [misc]none:  (1.1127979592570306e-297 -1.1510973857640039e-232 -1.6396360397102689e+220): 0
* [misc]none:  (-4.631295923206326e+93 -3.257471673811612e-50 -8.226715035278119e-287): 0
* [misc]none:  (-2.255644969852512e+52 2.0134175477923286e-117 3.3910436622012204e+183): 0
* [misc]none:  (2.1370924660732585e-137 -1.9002484997441084e+30 5.027318832526334e+284): 0
* [misc]none:  (1.0214816826091913e+147 -2.018162200747419e+293 9.44950370602155e+215): 0
* [misc]none:  (1.453842915541268e+187 -2.867904353761743e+219 -2.421523337020965e+257): 0
* [misc]none:  (4.172324580820008e-133 1.6563474243613627e-33 -1.7776992082231396e+54): 0
* [misc]none:  (-1.628700320265257e-151 2.0971939106770033e-216 -1.434814592155953e+91): 0
* [misc]none:  (1.504878381563487e-123 -3.141023895275641e+245 -3.001476290410935e-269): 0
* [misc]none:  (8.06210226572923e-308 1.3704592194822044e+306 1.5354587375460247e+100): 0
* [misc]none:  (-4.31661667731193e-265 2.0724540688985427e-14 7.930730410937821e+23): 0
* [misc]none:  (1.2219765589404705e+117 -2.933277138800709e+90 4.8815870270916733e+188): 0
* [misc]none:  (-1.5358179930137542e+240 -4.258931337566508e+98 -1.144012682699149e-39): 0
* [misc]none:  (6.537529222720653e-92 -1.945641295132362e+247 -2.0251187412162225e-215): 0
* [misc]none:  (3.5709688782890513e-43 4.870593988390179e-194 5.0297272719312193e+287): 0
* [misc]none:  (-4.2293501993920744e-96 -2.936155159322882e+301 -7.874126038339784e+73): 0
* [misc]none:  (-2.0493644688447925e+84 5.027897585816787e-27 -3.868283935462521e-278): 0
* [misc]none:  (0.3310558223342685 -7.980090992758681e-50 -1.0048785011627561e-129): 0
* [misc]none:  (8.127248813391785e+226 -1.483643755550628e-284 -2.8769042098391767e+238): 0
* [misc]none:  (-1.2522521950389272e-257 7.299372666988037e-80 3.506434173585025e+201): 0
* [misc]none:  (1.1750256677114723e+302 1.7531612809893653e+136 8.844853331262414e+38): 0
* [misc]none:  (1.178943808525994e-266 9.178781884958768e+207 1.0483964125162862e-06): 0
* [misc]none:  (-3.752236763580095e-230 8.105463665693362e-194 -2.7685933486986245e+247): 0
* [misc]none:  (3.9135950474809954e+67 -2.028037433935809e-224 -3.943510659225903e+212): 0
* [misc]none:  (8.87668088957479e+21 4.513009124607983e-82 -1.952161770664997e+168): 0
* [misc]none:  (-3.2026896500136593e+106 3.9964248706286793e+300 4.3776582898304966e+81): 0
* [misc]none:  (1.5274484190953342e-17 -2.5573519175490938e+242 -7.753367484782891e-85): 0
* [misc]none:  (-1.7158977874206925e-283 -1.532955510659015e-241 3.0568938748675284e-154): 0
* [misc]none:  (2.0291756699515804e-73 8.435011553475053e-247 -8.143702901727175e-109): 0
* [misc]none:  (1.2307420681126962e+74 2.4920454965720488e-241 -1.1022915791865336e+23): 0
* [misc]none:  (-4.4511831232730076e-54 6.667510734837939e+231 -5.374019621331118e+178): 0
* [misc]none:  (8.63476246502244e-94 1.1480211985789131e-156 4.954650634110254e+246): 0
* [misc]none:  (-4.9266537053540385e-269 4.091190676322657e-21 -4.404055326509536e-182): 0
* [misc]none:  (-1.5576281112600038e-142 -3.785849338481499e+20 -3.2892975748009025e-252): 0
* [misc]none:  (-6.133557683770476e-223 -1.497130859851894e+57 3.826166416762639e+216): 0
* [misc]none:  (1.1663715170234023e-33 1.821316082219445e-31 -1.441560479175162e+51): 0
* [misc]none:  (-4.8973687170160837e+185 5.965572216773997e-266 -1.7112087034006054e+282): 0
* [misc]none:  (-8.627178870504794e+293 1.1867578517998852e-122 -1.1961490139198145e+35): 0
* [misc]none:  (4.388887965185748e-231 -3.990775770507464e-143 12041477.739790332): 0
* [misc]none:  (-1.3991744780612765e+87 -1.8538245512787994e+136 4.053980966469101e+302): 0
* [misc]none:  (2.8402608015100704e-250 -1348564663705.779 -4.759757548074155e+194): 0
* [misc]none:  (4.52129342202891e+175 -1.6048248782469113e+61 -3.969668283468194e-23): 0
* [misc]none:  (5.258242405229196e-247 -9.498386678851063e-197 -1.0709835258895982e+166): 0
* [misc]none:  (2.0947420887546095e+247 -3.0889064673505896e+234 -8.244426084214624e-140): 0
* [misc]none:  (2.1503851256841087e+121 2.5076686139270383e-164 -0.0022300046209729825): 0
* [misc]none:  (1.194061872367895e+220 1.0389358047373285e-37 -2.0087808485765453e-304): 0
* [misc]none:  (1.3687590050193055e-147 -8.234756399670311e-72 1.6542751192792692e-300): 0
* [misc]none:  (-4.773347848801604e-165 -3.5335037548803817e-216 2.602023429993787e-14): 0
* [misc]none:  (-1.4942418769123512e-302 -1.6037432475041464e-152 2.415026600632841e-155): 0
* [misc]none:  (-2.983618099380393e-19 6.08182357871597e-19 3.919727770092923e-28): 0
* [misc]none:  (-8.796417170933511e-157 2.5194286288656994e+137 -2.803376858595825e-183): 0
* [misc]none:  (1.2240297986851114e+251 3.45808714185781e+34 7.826697678487528e+235): 0
* [misc]none:  (-1.210994144233347e-198 -2.0317891841612197e-99 -6.22947928384665e-25): 0
* [misc]none:  (-4.152794278830264e-202 -2.9721370995696006e-116 3.1150480705854042e+199): 0
* [misc]none:  (-1.1101608934114058e+37 5.160642497006506e-106 2.501487961589971e-186): 0
* [misc]none:  (-1.8295893302806206e-270 3.1707458428990324e-50 1.882634228916084e+104): 0
* [misc]none:  (6.309071689177259e-279 1.6670391926080915e+97 1.5332802818158087e+215): 0
* [misc]none:  (-1.0118756898573112e+168 -2.1001979573866983e-194 -4.555748018209325e-271): 0
* [misc]none:  (1.7527084173765072e+214 -3.566410115265179e+77 -2.0754253193237223e+276): 0
* [misc]none:  (1.4185317245467992e+152 -1.3311644893547746e+182 -4.3053676243877875e-107): 0
* [misc]none:  (-2.7534409364060876e-300 -3.678907798082827e-113 6.040835984474006e+24): 0
* [misc]none:  (-3.1450504266029292e+299 -6.998469069018224e-161 -7.470113998819676e+275): 0
* [misc]none:  (-1.8796565426908664e+204 -1.099557535291122e-30 -2.3724946872194442e+266): 0
* [misc]none:  (-9.99618015977074e-100 -5.970362695291997e+22 -3.879179322621676e+202): 0
* [misc]none:  (3.321782785676469e-255 1.5087150874010425e-211 -1.7358857320695963e-267): 0
* [misc]none:  (-1.2383129644834284e+160 -1.062164837135673e+42 2.2752166795075178e+129): 0
* [misc]none:  (3.459069485774471e+125 6.125263020847728e+200 1.0472163764779166e+211): 0
* [misc]none:  (-5.593167094268887e-190 1.7800753731525426e+39 -1.9563965618862005e+178): 0
* [misc]none:  (6.863804525144902e-237 1.2654352929763856e+201 3.676700438802301e-44): 0
* [misc]none:  (-4.5884699527721836e-114 5.519538337069105e+160 -3.884002241527716e-09): 0
* [misc]none:  (3.402956999639796e+258 1.529772447679324e+286 -3.3684544179202395e+273): 0
* [misc]none:  (-7.667160800564504e+201 -1.714192033762561e-105 -3.946016692023138e+286): 0
* [misc]none:  (1.8500142756663922e+65 6.180426682633145e-231 -1.1261653603541554e-107): 0
* [misc]none:  (-2.1793389213345715e+300 1.0083640164314813e-92 6.223068053793711e+127): 0
* [misc]none:  (2.2629994924347574e-07 -3.779843999226174e+139 -3.0614286694593404e-08): 0
* [misc]none:  (-5.8394743012211145e+230 -3.7587461773373327e+104 -1.0123667364292686e-192): 0
* [misc]none:  (-9.804519419015677e-288 -6.5890526844687485e-164 -2.899016522178297e+88): 0
* [misc]none:  (3.6950126077692746e-159 -1.0679075438337597e+159 2.659181518527327e+307): 0
* [misc]none:  (4.6359994596022095e-153 -1.3879444027553083e+305 8.584176116472669): 0
* [misc]none:  (3.802591719422796e-187 -8.074991766140518e+140 1.5800617558402157e+234): 0
* [misc]none:  (1.1606607614301422e-05 3.292067705150785e-57 -1.5601971401908854e-158): 0
* [misc]none:  (3.2577820155263023e+228 -5.2844454198705195e+305 7.723034435941923e+280): 0
* [misc]none:  (-1.0201482567312647e+227 2.333964054476269e-230 2.6282948365587408e-27): 0
* [misc]none:  (-5.91489283060648e-141 -2.941458472796967e-142 2.1831432166025805e+27): 0
* [misc]none:  (1.0985453227849344e-170 -5.571663930953366e+284 -8.610351411523465e+21): 0
* [misc]none:  (2.9274193921182663e+72 3.528685173788366e+131 -3.755398726662252e-104): 0
* [misc]none:  (1.732956797107532e+257 -0.003996887291900194 -3.319613025041288e+219): 0
* [misc]none:  (-2.8353852455895346e-236 2.4977177539308356e+32 6.19863515953618e-206): 0
* [misc]none:  (-6.234997468933024e+98 -1.2483206863621665e-82 -4.3245428365292906e-97): 0
* [misc]none:  (3.1166104193766994e-137 -2.3678767156364688e+110 -3.8121763850001037e+300): 0
* [misc]none:  (9.15071959046392e+15 -5.982768696796655e-301 1.4133605543126447e+178): 0
* [misc]none:  (-5.6835404426458884e-130 -6.116012871916241e+32 -4.56282292938935e+200): 0
* [misc]none:  (4.015919715899847e+137 1.2423686537018865e-16 -2.9190823764550885e+200): 0
* [misc]none:  (-8.369149872118526e+18 -6.505453409904161e-156 -1.571835822103132e-97): 0
* [misc]none:  (-2.3015506367476294e+261 4.559321205979136e-29 8.913124246398817e-290): 0
* [misc]none:  (-1.7739145562626414e-238 -7.800592841851725e-167 -7.036042050158767e-21): 0
* [misc]none:  (220237823157837.84 -1.0913289326464034e+189 -8.082418571799865e-207): 0
* [misc]none:  (4.4061588303824944e-303 -1.003094753737015e-245 2.971068685413927e+215): 0
* [misc]none:  (-4.9172013791785835e+247 3.20782828662563e+47 -1.3139682089382477e-268): 0
* [misc]none:  (-7.0800974540359565e-196 -1.0695941285170777e+259 2.3040347636911724e-27): 0
* [misc]none:  (7.527413299194134e-199 3.222113461096366e+139 9.80786621090237e-10): 0
* [misc]none:  (-6.984190141903233e+241 -9.583105380205228e+81 -1.1006480359267765e-71): 0
* [misc]none:  (4.5779060099920917e-17 8.583739956121865e-308 -3.5994403684981127e-10): 0
* [misc]none:  (-1.9722299820001865e+94 4.460218679195514e-149 5.690021676770787e+31): 0
* [misc]none:  (5.357335632184978e-22 9.84912431615415e+293 -5.955853021225728e-91): 0
* [misc]none:  (2.236333776084836e+240 8.787526117599876e+89 6.103872924194278e-110): 0
* [misc]none:  (-8.022655362628393e+40 -4.497266801596471e+100 2.4991141371272513e-282): 0
* [misc]none:  (2.4069680102931362e+144 -2.8732816710350813e-128 0.0006145505508753878): 0
* [misc]none:  (5.770600846660463e-216 2.781426133815738e-217 2.5557241024046246e-63): 0
* [misc]none:  (4.40681776351873e+173 -4.1462345069686375e+92 5.223765227005569e-152): 0
* [misc]none:  (-1.6334098586809e+149 -7.52056490230671e+247 7.351668255412019e-155): 0
* [misc]none:  (-5.755383151195205e+172 3.666021857234008e-105 -7.362277309884386e+163): 0
* [misc]none:  (2.1884482458744437e-81 7.345575675668017e+18 -5.064289876067956e+27): 0
* [misc]none:  (8.853831150429422e+166 1.8423314112002953e-90 -2.820439640817216e+236): 0
* [misc]none:  (2.5619404272463737e+146 -5.680359460857034e-50 2.9488263936935035e+118): 0
* [misc]none:  (1.4318039063168714e-09 -5.668682219996358e+270 9.534360742444564e-26): 0
* [misc]none:  (1.2538968992553631e-96 1.2604501780655313e-299 33610193246.41273): 0
* [misc]none:  (-4.7269786251670094e+219 9.689801239106332e+272 2.3118053548193494e+30): 0
* [misc]none:  (-5.491093062090541e+163 4.652749385182812e-160 9.610215461209792e+222): 0
* [misc]none:  All alt indices
* [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:  (9.568527921939742e-273 2.654414227492494e+20 1.7090726067739176e-227): 0
* [misc]none:  (7.696162327562603e-152 -1.7235772956324157e+44 -1.849105607217708e-205): 0
* [misc]none:  (5.106850318067203e-223 -8.776422694060002e-191 -1.0339801069916732e-122): 0
* [misc]none:  (1.3381086996667414e-215 -1.2294460237484715e+92 -9.903617261398821e+48): 0
* [misc]none:  (1.0224180420716733e-52 -5.2868600650398754e+73 9.705038014433044e-175): 0
* [misc]none:  (-2.2377664482363495e-145 -6.863248801263982e-282 6.028770352690154e-151): 0
* [misc]none:  (-425.15997261130053 -1.4215485644178288e+122 6.224141164637054e+75): 0
* [misc]none:  (-1.2086624476009651e-200 2.3623052767393814e+153 4.4633600804799425e+142): 0
* [misc]none:  (-1.6813749551547664e-222 -4.6390246315423324e+36 1.2790861077923577e+68): 0
* [misc]none:  (1.0592112097552954e+143 -7.191398511280425e-59 -2.3255237224962407e-56): 0
* [misc]none:  (1.6780592368033288e-262 1.5331200777386884e+269 2.973444851318118e-169): 0
* [misc]none:  (1.6828576275377584e-98 4.5525663232975395e+86 4.922686678959719e-213): 0
* [misc]none:  (9.601043864442096e+176 5.752669291865014e-257 3.0310347416413137e-258): 0
* [misc]none:  (-1.1043473204259838e-123 -2.06284826271339e+143 -7.24722487096989e+250): 0
* [misc]none:  (-2.2793842908096357e+72 -8.124520965103743e+145 3.727663855470157e+254): 0
* [misc]none:  (8.775974517752829e+204 -644684.1881687096 -5.072621494700167e+267): 0
* [misc]none:  (-4.473451124127099e-235 1.5758037123807388e+87 -3.1154131766396667e+29): 0
* [misc]none:  (2.4492953260422185e+131 5.835395598392501e+198 -1.2951522948212234e+105): 0
* [misc]none:  (2.2545095115116114e+189 -1.4107789582096962e+111 -4.521345173807944e-274): 0
* [misc]none:  (2.4757193927168845e-307 -3.9546390943242443e-82 1.457018723838865e-35): 0
* [misc]none:  (-1.5246504675906286e-147 -1.1042460154015769e-187 -3.30379604621756e-180): 0
* [misc]none:  (-8.185062082112633e+221 9.424239481611678e-294 1.5096638452158614e-71): 0
* [misc]none:  (-1.830572871972773e-27 -1.714392276509888e-289 -9.870003932393336e-46): 0
* [misc]none:  (-2.2727962542731896e+253 6.967234360883543e-112 2.0770495361468835e+203): 0
* [misc]none:  (-3.5348879909542174e+259 3.1401318723071353e-131 -1.4852188300484065e-239): 0
* [misc]none:  (-3.374264737975756e+72 -1.0890756353988414e+102 0.228970627026966): 0
* [misc]none:  (8.40469635347052e+100 2.1321881547753267e-44 1.7739584018359304e-207): 0
* [misc]none:  (-2.723194185823719e-255 6.866799226360426e-109 6.417434319517234e+231): 0
* [misc]none:  (-1.105123941463264e-44 -1.5442050061781137e-296 -2.5125878605191734e-29): 0
* [misc]none:  (4.508352673437809e+248 -1.4801509312754967e-61 -5.163900824605852e+32): 0
* [misc]none:  (1.430295312965348e-149 3.112001531242655e+80 3.0475240801607222e-148): 0
* [misc]none:  (-5.232709143225968e-98 -2.6904647286120434e+306 -2.4014893155423993e+35): 0
* [misc]none:  (1.4966275592591335e-123 6.384545099874781e-168 -1.9863653303691194e-296): 0
* [misc]none:  (-1.5110806788081036e+47 4.232269734875141e-205 4.1020469956028986e+24): 0
* [misc]none:  (2.1703230086091624e+277 -4.725142043601307e-47 2.68866513359689e-174): 0
* [misc]none:  (8.96636707501737e-13 -2.3580830331388543e-23 1.6082525618587168e-259): 0
* [misc]none:  (2.7230496615379425e-188 7.15832835948139e-179 -3.386296042382532e-190): 0
* [misc]none:  (2.991170371343952e+151 -7.407998779781806e-33 -7.014935371531484e-98): 0
* [misc]none:  (-2.580522918977788e+184 8.990843056511833e-32 3.9088008390110404e+59): 0
* [misc]none:  (6.754325943853309e-283 -1.0323836290065946e-292 -1.1379474227414984e+157): 0
* [misc]none:  (-4.747329706134133e-300 -2.266131068741548e-232 6.354961149716869e-97): 0
* [misc]none:  (2.8293820765322485e-296 5.3887495676776976e+171 -503507.16469484643): 0
* [misc]none:  (-1.9250288775511552e-19 9.871143682146977e-239 -1.9809585244792104e-221): 0
* [misc]none:  (-5.324127388080003e+141 5.123849747663666e+133 4.007761912625816e-148): 0
* [misc]none:  (3.321054281872602e+251 -7.33347091133757e-103 -3.967500572333352e+95): 0
* [misc]none:  (-8.002576117532625e+293 -344.7442723289036 8.452539306620761e+219): 0
* [misc]none:  (-3.8897511496224356e+161 4.4485313287564445e+252 -2.9971297913067123e-296): 0
* [misc]none:  (1.120554825473697e-298 7.175557259725409e-49 4.4800031186106794e-70): 0
* [misc]none:  (-1.3609788364339258e+82 2.5265807746711182e-73 1.4440898226736705e-53): 0
* [misc]none:  (-4.651815532356965e+285 -1.223165056942955e+279 2.3912903471184356e-134): 0
* [misc]none:  (3.53511184703484e+158 -2.8955398952451435e+131 1.5780761566396397e+125): 0
* [misc]none:  (1.534059348183312e-189 2.8419420301747055e+90 -2.318158899615234e+28): 0
* [misc]none:  (8.976998414840432e+184 3.9122094377392414e+59 -6.588522440277298e+124): 0
* [misc]none:  (-8.890171102288788e+241 -4.517606044160453e-29 -2.0229301807644786e+90): 0
* [misc]none:  (4.588817619865515e-83 6.908716276621429e+42 1.074034252081928e-96): 0
* [misc]none:  (-2.0525626505030474e-205 1.43328810513268e+174 -3.517237475307537e+70): 0
* [misc]none:  (1.6570172448601563e-137 2.4048926517811354e+66 -1.2386076426807104e+281): 0
* [misc]none:  (4.0623211606609595e-228 1.5982222044177176e+181 8.398043771606399e+47): 0
* [misc]none:  (-6.552213310391902e+218 -2.461870212435176e+181 -9.04145577094214e-51): 0
* [misc]none:  (6.730955893129463e-197 6.724679859609688e-169 1.4230714989143866e-75): 0
* [misc]none:  (3.493084834288097e-125 -8.87002524437924e-05 -9.534297923953677e-238): 0
* [misc]none:  (8.932193317773552e+156 -4.82948997845691e+115 -2.844669102107347e+110): 0
* [misc]none:  (6.614130481633629e+300 -6.631482835790804e+75 -2.927893218629978e+198): 0
* [misc]none:  (-5.425958198218161e-146 -5.212281525360505e+119 1.3240207557849338e+291): 0
* [misc]none:  (-6.155236203506664e+276 3.2574885636926814e-211 -9.779940061204298e+60): 0
* [misc]none:  (1.3680169753287455e-53 -1.5172504298350683e-122 2.2957389429922706e-176): 0
* [misc]none:  (1.3610327499536486e+226 4.84788597345363e+32 1.0657402022625375e+129): 0
* [misc]none:  (-6.206729553564092e+301 1.7927880379985524e+252 -8.795577755360774e-193): 0
* [misc]none:  (1.0006462262322276e+238 -9.304691570184222e+30 1.9963004369674967e-80): 0
* [misc]none:  (1.4604179220567222e+231 1.5216315041338872e-218 1.6707151526371295e-190): 0
* [misc]none:  (5.1990169359560766e-256 -6.08679419260233e+77 -2.864119470500123e-178): 0
* [misc]none:  (-4.976800097081315e-07 8.044445972631143e-28 2.635030752287841e+186): 0
* [misc]none:  (4.12100928340286e-184 9.74865050931635e+298 -7.146083996729688e+199): 0
* [misc]none:  (8.361834195928021e-55 7.311006071291519e-101 -1.2254396192804965e-192): 0
* [misc]none:  (1.782256728493473e+35 6.657191501816709e+167 -1.0237963707243293e+257): 0
* [misc]none:  (-2.376464365888854e-78 -3.222114505301457e-163 -7.76766480776823e+37): 0
* [misc]none:  (8.382633428275648e-297 -6.191205901832185e+168 2.0703305241322436e+71): 0
* [misc]none:  (6.099737398723264e-279 2.6679523035634032e-104 8.366391802268445e+167): 0
* [misc]none:  (2.870509274337958e-101 -2.318802051809187e-21 -2.362056093523898e-236): 0
* [misc]none:  (4.384610242475067e+141 1.4474621781713568e+65 -1.410046620426318e-213): 0
* [misc]none:  (-4.423020421030483e+291 -3.178469867925502e-246 -7.447731371021966e+71): 0
* [misc]none:  (5.154503491655989e+241 -1.6398756117817188e+244 -5.198066934157678e+220): 0
* [misc]none:  (5.0588074473585105e-110 3.742291531299835e+250 5.013161881068948e+307): 0
* [misc]none:  (66089027839097.664 1.4351275309127672e-234 4.416557773834991e-25): 0
* [misc]none:  (-7.605311329977112e+177 3.0442880854679596e-31 -1.3989503218776358e-06): 0
* [misc]none:  (4.664141571059094e-118 -1.8512083623442292e+194 -1.3284106669669889e+173): 0
* [misc]none:  (1.0684729481870001e-64 6.3073426358942834e+75 -2.217199084242749e+17): 0
* [misc]none:  (3.1520683467019444e-71 0.19659739803111875 7.786539791485611e+181): 0
* [misc]none:  (2.4995037253728046e-268 -26830062846468156.0 4.637177905335891e-10): 0
* [misc]none:  (-12679727921.874447 8.652041834233969e-101 -3.577245999178336e-189): 0
* [misc]none:  (3.209451012414084e+270 3.7907433031673317e-256 8.76720870691781e-247): 0
* [misc]none:  (6.160331831501279e+241 -4.568727829143705e-23 -1.757665168464323e+292): 0
* [misc]none:  (-7.388307231162813e-47 3.4124175886179475e+199 3.0044088767799776e-30): 0
* [misc]none:  (4.7140908881238785e+103 2.3604863517900675e+30 6.476730028728146e-228): 0
* [misc]none:  (-1.2222609474395545e-52 3.369115258471057e+173 1.3383461391823352e+303): 0
* [misc]none:  (-2.6712990814490822e+247 2.3157792094796435e+174 -9.842315617180003e+283): 0
* [misc]none:  (-8.795626148255621e+120 -5.857596831984434e-95 4.097601147132013e-78): 0
* [misc]none:  (4.194634882433556e+107 -1.1526493241483084e+241 3.3390334975960143e-07): 0
* [misc]none:  (-1.8082167822566404e+183 2.2475155879831534e-92 -4.169290160322216e+246): 0
* [misc]none:  (1.030614327019319e-115 -3.2696794723802255e-27 1.8172920677413648e+103): 0
* [misc]none:  (-5.3218781381905035e-129 -2.362048596457182e+298 -6.16723792553022e+40): 0
* [misc]none:  (-2.40789942954366e+44 -2.9998533512328024e-144 -1.4147186694962813e-176): 0
* [misc]none:  (1.186346974675696e+155 -1.2827160692503531e+104 6.283729883572828e+84): 0
* [misc]none:  (3.6636765762957594e-187 1.7036347403091437e+117 9.645064592867311e+67): 0
* [misc]none:  (-5.1224941914889595e+118 1.3872947227834175e-251 7.12145855246931e-10): 0
* [misc]none:  (-4.3661371414490136e+281 -1.4301261995935981e+54 2.693461062117409e-112): 0
* [misc]none:  (1.6465279540530418e+78 2.43524332605807e-278 1.0576788912710565e-08): 0
* [misc]none:  (-17241.138101224224 4.764080499693186e-90 -7.290271346747531e-14): 0
* [misc]none:  (1.3557350350348342e+244 -1.3554385625614067e+48 -1.8946459759589086e-22): 0
* [misc]none:  (1.89639974853721e+92 8.2625435987749e+74 5.2790261762422465e+19): 0
* [misc]none:  (2.0179287053921742e+58 2.884705125857619e-274 2.031068672850261e-255): 0
* [misc]none:  (2.4294527094706238e+82 7.274711555473555e+146 1.5565784464325313e+71): 0
* [misc]none:  (1.2222184804619167e+37 -5.55277905008488e-191 -2.1360290498375943e+32): 0
* [misc]none:  (4.642568065399805e-260 -4.493058001076021e-21 -2.6740094065663153e+105): 0
* [misc]none:  (3.8347842435652736e+125 -9.848724265902522e+103 7.178809205583962e-175): 0
* [misc]none:  (-3.8059392134174312e-280 -3.954815085266754e+305 1.4235559851356953e-239): 0
* [misc]none:  (4.74667737826054e-29 -1.2486100740485319e+302 -143677164285.72263): 0
* [misc]none:  (-4.897389787642899e+104 1.868517529275615e+140 -2.5024214599876482e+172): 0
* [misc]none:  (1.5276944825842992e+272 2.1335024129380783e-97 1.0953112641111952e+229): 0
* [misc]none:  (3.2587696828142436e+75 -1.5310860302360472e-220 3.7735141958833343e+170): 0
* [misc]none:  (1.0233799517176219e-267 -9.329140131915071e-38 5.348181441205713e-277): 0
* [misc]none:  (-5.024170449312866e+115 -1.611431508373217e+195 2.6631876145177815e-299): 0
* [misc]none:  (-1.3496423811442664e+228 -6.4194246582119476e+212 -6.796944270882852e-34): 0
* [misc]none:  (1.4781375733319608e-242 -2.1294463337627754e-19 3.003847336951168e+42): 0
* [misc]none:  (1.6609596531041104e-183 -6.156933300042242e+249 -2.249022094261578e+256): 0
* [misc]none:  (-4.347828572616086e-184 -2.2415468254308968e-275 5.41731325733976e-115): 0
* [misc]none:  (1.0395093493101161e-28 -6.035695609668586e-193 5.540829799846932e-307): 0
* [misc]none:  (-6.2448878184443784e-195 8.949756960721031e-195 2.722605535602291e+155): 0
* [misc]none:  (-4.714069429956778e+287 2.9453252035345084e+174 -5.843713571039491e+54): 0
* [misc]none:  (1.0160216232612932e-143 -2.425692316345541e+35 -2.0645141541195737e-123): 0
* [misc]none:  (4.178563936936926e-127 2.1657839461347663e+307 6.629963208070179e-180): 0
* [misc]none:  (-7.809772272521888e+231 -1.0023220030653375e-143 2.5453262068352747e+307): 0
* [misc]none:  (-1.1570938550413644e-156 1.7005338626981419e-143 7.808994559121766e-111): 0
* [misc]none:  (8.788013174305029e-230 -2.708463803258993e-217 2.5557776305939374e+86): 0
* [misc]none:  (-7.843719408056975e+200 -5.36699847063349e-281 -5.474411714258796e-200): 0
* [misc]none:  (3.2454192740264175e-113 4.896551008070313e-307 1.2607016124581028e+98): 0
* [misc]none:  (-2.1121060804534514e-153 -3.946147066150504e-295 6.351701463874224e-34): 0
* [misc]none:  (1.1127979592570306e-297 -1.1510973857640039e-232 -1.6396360397102689e+220): 0
* [misc]none:  (-4.631295923206326e+93 -3.257471673811612e-50 -8.226715035278119e-287): 0
* [misc]none:  (-2.255644969852512e+52 2.0134175477923286e-117 3.3910436622012204e+183): 0
* [misc]none:  (2.1370924660732585e-137 -1.9002484997441084e+30 5.027318832526334e+284): 0
* [misc]none:  (1.0214816826091913e+147 -2.018162200747419e+293 9.44950370602155e+215): 0
* [misc]none:  (1.453842915541268e+187 -2.867904353761743e+219 -2.421523337020965e+257): 0
* [misc]none:  (4.172324580820008e-133 1.6563474243613627e-33 -1.7776992082231396e+54): 0
* [misc]none:  (-1.628700320265257e-151 2.0971939106770033e-216 -1.434814592155953e+91): 0
* [misc]none:  (1.504878381563487e-123 -3.141023895275641e+245 -3.001476290410935e-269): 0
* [misc]none:  (8.06210226572923e-308 1.3704592194822044e+306 1.5354587375460247e+100): 0
* [misc]none:  (-4.31661667731193e-265 2.0724540688985427e-14 7.930730410937821e+23): 0
* [misc]none:  (1.2219765589404705e+117 -2.933277138800709e+90 4.8815870270916733e+188): 0
* [misc]none:  (-1.5358179930137542e+240 -4.258931337566508e+98 -1.144012682699149e-39): 0
* [misc]none:  (6.537529222720653e-92 -1.945641295132362e+247 -2.0251187412162225e-215): 0
* [misc]none:  (3.5709688782890513e-43 4.870593988390179e-194 5.0297272719312193e+287): 0
* [misc]none:  (-4.2293501993920744e-96 -2.936155159322882e+301 -7.874126038339784e+73): 0
* [misc]none:  (-2.0493644688447925e+84 5.027897585816787e-27 -3.868283935462521e-278): 0
* [misc]none:  (0.3310558223342685 -7.980090992758681e-50 -1.0048785011627561e-129): 0
* [misc]none:  (8.127248813391785e+226 -1.483643755550628e-284 -2.8769042098391767e+238): 0
* [misc]none:  (-1.2522521950389272e-257 7.299372666988037e-80 3.506434173585025e+201): 0
* [misc]none:  (1.1750256677114723e+302 1.7531612809893653e+136 8.844853331262414e+38): 0
* [misc]none:  (1.178943808525994e-266 9.178781884958768e+207 1.0483964125162862e-06): 0
* [misc]none:  (-3.752236763580095e-230 8.105463665693362e-194 -2.7685933486986245e+247): 0
* [misc]none:  (3.9135950474809954e+67 -2.028037433935809e-224 -3.943510659225903e+212): 0
* [misc]none:  (8.87668088957479e+21 4.513009124607983e-82 -1.952161770664997e+168): 0
* [misc]none:  (-3.2026896500136593e+106 3.9964248706286793e+300 4.3776582898304966e+81): 0
* [misc]none:  (1.5274484190953342e-17 -2.5573519175490938e+242 -7.753367484782891e-85): 0
* [misc]none:  (-1.7158977874206925e-283 -1.532955510659015e-241 3.0568938748675284e-154): 0
* [misc]none:  (2.0291756699515804e-73 8.435011553475053e-247 -8.143702901727175e-109): 0
* [misc]none:  (1.2307420681126962e+74 2.4920454965720488e-241 -1.1022915791865336e+23): 0
* [misc]none:  (-4.4511831232730076e-54 6.667510734837939e+231 -5.374019621331118e+178): 0
* [misc]none:  (8.63476246502244e-94 1.1480211985789131e-156 4.954650634110254e+246): 0
* [misc]none:  (-4.9266537053540385e-269 4.091190676322657e-21 -4.404055326509536e-182): 0
* [misc]none:  (-1.5576281112600038e-142 -3.785849338481499e+20 -3.2892975748009025e-252): 0
* [misc]none:  (-6.133557683770476e-223 -1.497130859851894e+57 3.826166416762639e+216): 0
* [misc]none:  (1.1663715170234023e-33 1.821316082219445e-31 -1.441560479175162e+51): 0
* [misc]none:  (-4.8973687170160837e+185 5.965572216773997e-266 -1.7112087034006054e+282): 0
* [misc]none:  (-8.627178870504794e+293 1.1867578517998852e-122 -1.1961490139198145e+35): 0
* [misc]none:  (4.388887965185748e-231 -3.990775770507464e-143 12041477.739790332): 0
* [misc]none:  (-1.3991744780612765e+87 -1.8538245512787994e+136 4.053980966469101e+302): 0
* [misc]none:  (2.8402608015100704e-250 -1348564663705.779 -4.759757548074155e+194): 0
* [misc]none:  (4.52129342202891e+175 -1.6048248782469113e+61 -3.969668283468194e-23): 0
* [misc]none:  (5.258242405229196e-247 -9.498386678851063e-197 -1.0709835258895982e+166): 0
* [misc]none:  (2.0947420887546095e+247 -3.0889064673505896e+234 -8.244426084214624e-140): 0
* [misc]none:  (2.1503851256841087e+121 2.5076686139270383e-164 -0.0022300046209729825): 0
* [misc]none:  (1.194061872367895e+220 1.0389358047373285e-37 -2.0087808485765453e-304): 0
* [misc]none:  (1.3687590050193055e-147 -8.234756399670311e-72 1.6542751192792692e-300): 0
* [misc]none:  (-4.773347848801604e-165 -3.5335037548803817e-216 2.602023429993787e-14): 0
* [misc]none:  (-1.4942418769123512e-302 -1.6037432475041464e-152 2.415026600632841e-155): 0
* [misc]none:  (-2.983618099380393e-19 6.08182357871597e-19 3.919727770092923e-28): 0
* [misc]none:  (-8.796417170933511e-157 2.5194286288656994e+137 -2.803376858595825e-183): 0
* [misc]none:  (1.2240297986851114e+251 3.45808714185781e+34 7.826697678487528e+235): 0
* [misc]none:  (-1.210994144233347e-198 -2.0317891841612197e-99 -6.22947928384665e-25): 0
* [misc]none:  (-4.152794278830264e-202 -2.9721370995696006e-116 3.1150480705854042e+199): 0
* [misc]none:  (-1.1101608934114058e+37 5.160642497006506e-106 2.501487961589971e-186): 0
* [misc]none:  (-1.8295893302806206e-270 3.1707458428990324e-50 1.882634228916084e+104): 0
* [misc]none:  (6.309071689177259e-279 1.6670391926080915e+97 1.5332802818158087e+215): 0
* [misc]none:  (-1.0118756898573112e+168 -2.1001979573866983e-194 -4.555748018209325e-271): 0
* [misc]none:  (1.7527084173765072e+214 -3.566410115265179e+77 -2.0754253193237223e+276): 0
* [misc]none:  (1.4185317245467992e+152 -1.3311644893547746e+182 -4.3053676243877875e-107): 0
* [misc]none:  (-2.7534409364060876e-300 -3.678907798082827e-113 6.040835984474006e+24): 0
* [misc]none:  (-3.1450504266029292e+299 -6.998469069018224e-161 -7.470113998819676e+275): 0
* [misc]none:  (-1.8796565426908664e+204 -1.099557535291122e-30 -2.3724946872194442e+266): 0
* [misc]none:  (-9.99618015977074e-100 -5.970362695291997e+22 -3.879179322621676e+202): 0
* [misc]none:  (3.321782785676469e-255 1.5087150874010425e-211 -1.7358857320695963e-267): 0
* [misc]none:  (-1.2383129644834284e+160 -1.062164837135673e+42 2.2752166795075178e+129): 0
* [misc]none:  (3.459069485774471e+125 6.125263020847728e+200 1.0472163764779166e+211): 0
* [misc]none:  (-5.593167094268887e-190 1.7800753731525426e+39 -1.9563965618862005e+178): 0
* [misc]none:  (6.863804525144902e-237 1.2654352929763856e+201 3.676700438802301e-44): 0
* [misc]none:  (-4.5884699527721836e-114 5.519538337069105e+160 -3.884002241527716e-09): 0
* [misc]none:  (3.402956999639796e+258 1.529772447679324e+286 -3.3684544179202395e+273): 0
* [misc]none:  (-7.667160800564504e+201 -1.714192033762561e-105 -3.946016692023138e+286): 0
* [misc]none:  (1.8500142756663922e+65 6.180426682633145e-231 -1.1261653603541554e-107): 0
* [misc]none:  (-2.1793389213345715e+300 1.0083640164314813e-92 6.223068053793711e+127): 0
* [misc]none:  (2.2629994924347574e-07 -3.779843999226174e+139 -3.0614286694593404e-08): 0
* [misc]none:  (-5.8394743012211145e+230 -3.7587461773373327e+104 -1.0123667364292686e-192): 0
* [misc]none:  (-9.804519419015677e-288 -6.5890526844687485e-164 -2.899016522178297e+88): 0
* [misc]none:  (3.6950126077692746e-159 -1.0679075438337597e+159 2.659181518527327e+307): 0
* [misc]none:  (4.6359994596022095e-153 -1.3879444027553083e+305 8.584176116472669): 0
* [misc]none:  (3.802591719422796e-187 -8.074991766140518e+140 1.5800617558402157e+234): 0
* [misc]none:  (1.1606607614301422e-05 3.292067705150785e-57 -1.5601971401908854e-158): 0
* [misc]none:  (3.2577820155263023e+228 -5.2844454198705195e+305 7.723034435941923e+280): 0
* [misc]none:  (-1.0201482567312647e+227 2.333964054476269e-230 2.6282948365587408e-27): 0
* [misc]none:  (-5.91489283060648e-141 -2.941458472796967e-142 2.1831432166025805e+27): 0
* [misc]none:  (1.0985453227849344e-170 -5.571663930953366e+284 -8.610351411523465e+21): 0
* [misc]none:  (2.9274193921182663e+72 3.528685173788366e+131 -3.755398726662252e-104): 0
* [misc]none:  (1.732956797107532e+257 -0.003996887291900194 -3.319613025041288e+219): 0
* [misc]none:  (-2.8353852455895346e-236 2.4977177539308356e+32 6.19863515953618e-206): 0
* [misc]none:  (-6.234997468933024e+98 -1.2483206863621665e-82 -4.3245428365292906e-97): 0
* [misc]none:  (3.1166104193766994e-137 -2.3678767156364688e+110 -3.8121763850001037e+300): 0
* [misc]none:  (9.15071959046392e+15 -5.982768696796655e-301 1.4133605543126447e+178): 0
* [misc]none:  (-5.6835404426458884e-130 -6.116012871916241e+32 -4.56282292938935e+200): 0
* [misc]none:  (4.015919715899847e+137 1.2423686537018865e-16 -2.9190823764550885e+200): 0
* [misc]none:  (-8.369149872118526e+18 -6.505453409904161e-156 -1.571835822103132e-97): 0
* [misc]none:  (-2.3015506367476294e+261 4.559321205979136e-29 8.913124246398817e-290): 0
* [misc]none:  (-1.7739145562626414e-238 -7.800592841851725e-167 -7.036042050158767e-21): 0
* [misc]none:  (220237823157837.84 -1.0913289326464034e+189 -8.082418571799865e-207): 0
* [misc]none:  (4.4061588303824944e-303 -1.003094753737015e-245 2.971068685413927e+215): 0
* [misc]none:  (-4.9172013791785835e+247 3.20782828662563e+47 -1.3139682089382477e-268): 0
* [misc]none:  (-7.0800974540359565e-196 -1.0695941285170777e+259 2.3040347636911724e-27): 0
* [misc]none:  (7.527413299194134e-199 3.222113461096366e+139 9.80786621090237e-10): 0
* [misc]none:  (-6.984190141903233e+241 -9.583105380205228e+81 -1.1006480359267765e-71): 0
* [misc]none:  (4.5779060099920917e-17 8.583739956121865e-308 -3.5994403684981127e-10): 0
* [misc]none:  (-1.9722299820001865e+94 4.460218679195514e-149 5.690021676770787e+31): 0
* [misc]none:  (5.357335632184978e-22 9.84912431615415e+293 -5.955853021225728e-91): 0
* [misc]none:  (2.236333776084836e+240 8.787526117599876e+89 6.103872924194278e-110): 0
* [misc]none:  (-8.022655362628393e+40 -4.497266801596471e+100 2.4991141371272513e-282): 0
* [misc]none:  (2.4069680102931362e+144 -2.8732816710350813e-128 0.0006145505508753878): 0
* [misc]none:  (5.770600846660463e-216 2.781426133815738e-217 2.5557241024046246e-63): 0
* [misc]none:  (4.40681776351873e+173 -4.1462345069686375e+92 5.223765227005569e-152): 0
* [misc]none:  (-1.6334098586809e+149 -7.52056490230671e+247 7.351668255412019e-155): 0
* [misc]none:  (-5.755383151195205e+172 3.666021857234008e-105 -7.362277309884386e+163): 0
* [misc]none:  (2.1884482458744437e-81 7.345575675668017e+18 -5.064289876067956e+27): 0
* [misc]none:  (8.853831150429422e+166 1.8423314112002953e-90 -2.820439640817216e+236): 0
* [misc]none:  (2.5619404272463737e+146 -5.680359460857034e-50 2.9488263936935035e+118): 0
* [misc]none:  (1.4318039063168714e-09 -5.668682219996358e+270 9.534360742444564e-26): 0
* [misc]none:  (1.2538968992553631e-96 1.2604501780655313e-299 33610193246.41273): 0
* [misc]none:  (-4.7269786251670094e+219 9.689801239106332e+272 2.3118053548193494e+30): 0
* [misc]none:  (-5.491093062090541e+163 4.652749385182812e-160 9.610215461209792e+222): 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: 6
* [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) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* [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) (* (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 indices
* [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) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 2
* [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))))): 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:  (9.568527921939742e-273 2.654414227492494e+20 1.7090726067739176e-227): 2
* [misc]none:  (7.696162327562603e-152 -1.7235772956324157e+44 -1.849105607217708e-205): 1
* [misc]none:  (5.106850318067203e-223 -8.776422694060002e-191 -1.0339801069916732e-122): 1
* [misc]none:  (1.3381086996667414e-215 -1.2294460237484715e+92 -9.903617261398821e+48): 0
* [misc]none:  (1.0224180420716733e-52 -5.2868600650398754e+73 9.705038014433044e-175): 1
* [misc]none:  (-2.2377664482363495e-145 -6.863248801263982e-282 6.028770352690154e-151): 2
* [misc]none:  (-425.15997261130053 -1.4215485644178288e+122 6.224141164637054e+75): 0
* [misc]none:  (-1.2086624476009651e-200 2.3623052767393814e+153 4.4633600804799425e+142): 0
* [misc]none:  (-1.6813749551547664e-222 -4.6390246315423324e+36 1.2790861077923577e+68): 0
* [misc]none:  (1.0592112097552954e+143 -7.191398511280425e-59 -2.3255237224962407e-56): 1
* [misc]none:  (1.6780592368033288e-262 1.5331200777386884e+269 2.973444851318118e-169): 0
* [misc]none:  (1.6828576275377584e-98 4.5525663232975395e+86 4.922686678959719e-213): 0
* [misc]none:  (9.601043864442096e+176 5.752669291865014e-257 3.0310347416413137e-258): 1
* [misc]none:  (-1.1043473204259838e-123 -2.06284826271339e+143 -7.24722487096989e+250): 0
* [misc]none:  (-2.2793842908096357e+72 -8.124520965103743e+145 3.727663855470157e+254): 0
* [misc]none:  (8.775974517752829e+204 -644684.1881687096 -5.072621494700167e+267): 1
* [misc]none:  (-4.473451124127099e-235 1.5758037123807388e+87 -3.1154131766396667e+29): 0
* [misc]none:  (2.4492953260422185e+131 5.835395598392501e+198 -1.2951522948212234e+105): 1
* [misc]none:  (2.2545095115116114e+189 -1.4107789582096962e+111 -4.521345173807944e-274): 0
* [misc]none:  (2.4757193927168845e-307 -3.9546390943242443e-82 1.457018723838865e-35): 0
* [misc]none:  (-1.5246504675906286e-147 -1.1042460154015769e-187 -3.30379604621756e-180): 1
* [misc]none:  (-8.185062082112633e+221 9.424239481611678e-294 1.5096638452158614e-71): 0
* [misc]none:  (-1.830572871972773e-27 -1.714392276509888e-289 -9.870003932393336e-46): 1
* [misc]none:  (-2.2727962542731896e+253 6.967234360883543e-112 2.0770495361468835e+203): 1
* [misc]none:  (-3.5348879909542174e+259 3.1401318723071353e-131 -1.4852188300484065e-239): 1
* [misc]none:  (-3.374264737975756e+72 -1.0890756353988414e+102 0.228970627026966): 1
* [misc]none:  (8.40469635347052e+100 2.1321881547753267e-44 1.7739584018359304e-207): 1
* [misc]none:  (-2.723194185823719e-255 6.866799226360426e-109 6.417434319517234e+231): 0
* [misc]none:  (-1.105123941463264e-44 -1.5442050061781137e-296 -2.5125878605191734e-29): 3
* [misc]none:  (4.508352673437809e+248 -1.4801509312754967e-61 -5.163900824605852e+32): 1
* [misc]none:  (1.430295312965348e-149 3.112001531242655e+80 3.0475240801607222e-148): 1
* [misc]none:  (-5.232709143225968e-98 -2.6904647286120434e+306 -2.4014893155423993e+35): 0
* [misc]none:  (1.4966275592591335e-123 6.384545099874781e-168 -1.9863653303691194e-296): 1
* [misc]none:  (-1.5110806788081036e+47 4.232269734875141e-205 4.1020469956028986e+24): 1
* [misc]none:  (2.1703230086091624e+277 -4.725142043601307e-47 2.68866513359689e-174): 1
* [misc]none:  (8.96636707501737e-13 -2.3580830331388543e-23 1.6082525618587168e-259): 1
* [misc]none:  (2.7230496615379425e-188 7.15832835948139e-179 -3.386296042382532e-190): 1
* [misc]none:  (2.991170371343952e+151 -7.407998779781806e-33 -7.014935371531484e-98): 1
* [misc]none:  (-2.580522918977788e+184 8.990843056511833e-32 3.9088008390110404e+59): 1
* [misc]none:  (6.754325943853309e-283 -1.0323836290065946e-292 -1.1379474227414984e+157): 0
* [misc]none:  (-4.747329706134133e-300 -2.266131068741548e-232 6.354961149716869e-97): 0
* [misc]none:  (2.8293820765322485e-296 5.3887495676776976e+171 -503507.16469484643): 0
* [misc]none:  (-1.9250288775511552e-19 9.871143682146977e-239 -1.9809585244792104e-221): 1
* [misc]none:  (-5.324127388080003e+141 5.123849747663666e+133 4.007761912625816e-148): 0
* [misc]none:  (3.321054281872602e+251 -7.33347091133757e-103 -3.967500572333352e+95): 1
* [misc]none:  (-8.002576117532625e+293 -344.7442723289036 8.452539306620761e+219): 1
* [misc]none:  (-3.8897511496224356e+161 4.4485313287564445e+252 -2.9971297913067123e-296): 0
* [misc]none:  (1.120554825473697e-298 7.175557259725409e-49 4.4800031186106794e-70): 0
* [misc]none:  (-1.3609788364339258e+82 2.5265807746711182e-73 1.4440898226736705e-53): 1
* [misc]none:  (-4.651815532356965e+285 -1.223165056942955e+279 2.3912903471184356e-134): 1
* [misc]none:  (3.53511184703484e+158 -2.8955398952451435e+131 1.5780761566396397e+125): 1
* [misc]none:  (1.534059348183312e-189 2.8419420301747055e+90 -2.318158899615234e+28): 0
* [misc]none:  (8.976998414840432e+184 3.9122094377392414e+59 -6.588522440277298e+124): 1
* [misc]none:  (-8.890171102288788e+241 -4.517606044160453e-29 -2.0229301807644786e+90): 1
* [misc]none:  (4.588817619865515e-83 6.908716276621429e+42 1.074034252081928e-96): 1
* [misc]none:  (-2.0525626505030474e-205 1.43328810513268e+174 -3.517237475307537e+70): 0
* [misc]none:  (1.6570172448601563e-137 2.4048926517811354e+66 -1.2386076426807104e+281): 0
* [misc]none:  (4.0623211606609595e-228 1.5982222044177176e+181 8.398043771606399e+47): 0
* [misc]none:  (-6.552213310391902e+218 -2.461870212435176e+181 -9.04145577094214e-51): 1
* [misc]none:  (6.730955893129463e-197 6.724679859609688e-169 1.4230714989143866e-75): 0
* [misc]none:  (3.493084834288097e-125 -8.87002524437924e-05 -9.534297923953677e-238): 1
* [misc]none:  (8.932193317773552e+156 -4.82948997845691e+115 -2.844669102107347e+110): 1
* [misc]none:  (6.614130481633629e+300 -6.631482835790804e+75 -2.927893218629978e+198): 1
* [misc]none:  (-5.425958198218161e-146 -5.212281525360505e+119 1.3240207557849338e+291): 0
* [misc]none:  (-6.155236203506664e+276 3.2574885636926814e-211 -9.779940061204298e+60): 1
* [misc]none:  (1.3680169753287455e-53 -1.5172504298350683e-122 2.2957389429922706e-176): 1
* [misc]none:  (1.3610327499536486e+226 4.84788597345363e+32 1.0657402022625375e+129): 1
* [misc]none:  (-6.206729553564092e+301 1.7927880379985524e+252 -8.795577755360774e-193): 1
* [misc]none:  (1.0006462262322276e+238 -9.304691570184222e+30 1.9963004369674967e-80): 0
* [misc]none:  (1.4604179220567222e+231 1.5216315041338872e-218 1.6707151526371295e-190): 0
* [misc]none:  (5.1990169359560766e-256 -6.08679419260233e+77 -2.864119470500123e-178): 1
* [misc]none:  (-4.976800097081315e-07 8.044445972631143e-28 2.635030752287841e+186): 0
* [misc]none:  (4.12100928340286e-184 9.74865050931635e+298 -7.146083996729688e+199): 0
* [misc]none:  (8.361834195928021e-55 7.311006071291519e-101 -1.2254396192804965e-192): 1
* [misc]none:  (1.782256728493473e+35 6.657191501816709e+167 -1.0237963707243293e+257): 0
* [misc]none:  (-2.376464365888854e-78 -3.222114505301457e-163 -7.76766480776823e+37): 2
* [misc]none:  (8.382633428275648e-297 -6.191205901832185e+168 2.0703305241322436e+71): 0
* [misc]none:  (6.099737398723264e-279 2.6679523035634032e-104 8.366391802268445e+167): 0
* [misc]none:  (2.870509274337958e-101 -2.318802051809187e-21 -2.362056093523898e-236): 1
* [misc]none:  (4.384610242475067e+141 1.4474621781713568e+65 -1.410046620426318e-213): 0
* [misc]none:  (-4.423020421030483e+291 -3.178469867925502e-246 -7.447731371021966e+71): 1
* [misc]none:  (5.154503491655989e+241 -1.6398756117817188e+244 -5.198066934157678e+220): 1
* [misc]none:  (5.0588074473585105e-110 3.742291531299835e+250 5.013161881068948e+307): 0
* [misc]none:  (66089027839097.664 1.4351275309127672e-234 4.416557773834991e-25): 1
* [misc]none:  (-7.605311329977112e+177 3.0442880854679596e-31 -1.3989503218776358e-06): 1
* [misc]none:  (4.664141571059094e-118 -1.8512083623442292e+194 -1.3284106669669889e+173): 0
* [misc]none:  (1.0684729481870001e-64 6.3073426358942834e+75 -2.217199084242749e+17): 0
* [misc]none:  (3.1520683467019444e-71 0.19659739803111875 7.786539791485611e+181): 0
* [misc]none:  (2.4995037253728046e-268 -26830062846468156.0 4.637177905335891e-10): 0
* [misc]none:  (-12679727921.874447 8.652041834233969e-101 -3.577245999178336e-189): 1
* [misc]none:  (3.209451012414084e+270 3.7907433031673317e-256 8.76720870691781e-247): 1
* [misc]none:  (6.160331831501279e+241 -4.568727829143705e-23 -1.757665168464323e+292): 0
* [misc]none:  (-7.388307231162813e-47 3.4124175886179475e+199 3.0044088767799776e-30): 3
* [misc]none:  (4.7140908881238785e+103 2.3604863517900675e+30 6.476730028728146e-228): 1
* [misc]none:  (-1.2222609474395545e-52 3.369115258471057e+173 1.3383461391823352e+303): 0
* [misc]none:  (-2.6712990814490822e+247 2.3157792094796435e+174 -9.842315617180003e+283): 2
* [misc]none:  (-8.795626148255621e+120 -5.857596831984434e-95 4.097601147132013e-78): 1
* [misc]none:  (4.194634882433556e+107 -1.1526493241483084e+241 3.3390334975960143e-07): 0
* [misc]none:  (-1.8082167822566404e+183 2.2475155879831534e-92 -4.169290160322216e+246): 1
* [misc]none:  (1.030614327019319e-115 -3.2696794723802255e-27 1.8172920677413648e+103): 0
* [misc]none:  (-5.3218781381905035e-129 -2.362048596457182e+298 -6.16723792553022e+40): 0
* [misc]none:  (-2.40789942954366e+44 -2.9998533512328024e-144 -1.4147186694962813e-176): 1
* [misc]none:  (1.186346974675696e+155 -1.2827160692503531e+104 6.283729883572828e+84): 0
* [misc]none:  (3.6636765762957594e-187 1.7036347403091437e+117 9.645064592867311e+67): 0
* [misc]none:  (-5.1224941914889595e+118 1.3872947227834175e-251 7.12145855246931e-10): 1
* [misc]none:  (-4.3661371414490136e+281 -1.4301261995935981e+54 2.693461062117409e-112): 1
* [misc]none:  (1.6465279540530418e+78 2.43524332605807e-278 1.0576788912710565e-08): 1
* [misc]none:  (-17241.138101224224 4.764080499693186e-90 -7.290271346747531e-14): 1
* [misc]none:  (1.3557350350348342e+244 -1.3554385625614067e+48 -1.8946459759589086e-22): 1
* [misc]none:  (1.89639974853721e+92 8.2625435987749e+74 5.2790261762422465e+19): 1
* [misc]none:  (2.0179287053921742e+58 2.884705125857619e-274 2.031068672850261e-255): 1
* [misc]none:  (2.4294527094706238e+82 7.274711555473555e+146 1.5565784464325313e+71): 1
* [misc]none:  (1.2222184804619167e+37 -5.55277905008488e-191 -2.1360290498375943e+32): 1
* [misc]none:  (4.642568065399805e-260 -4.493058001076021e-21 -2.6740094065663153e+105): 0
* [misc]none:  (3.8347842435652736e+125 -9.848724265902522e+103 7.178809205583962e-175): 0
* [misc]none:  (-3.8059392134174312e-280 -3.954815085266754e+305 1.4235559851356953e-239): 1
* [misc]none:  (4.74667737826054e-29 -1.2486100740485319e+302 -143677164285.72263): 4
* [misc]none:  (-4.897389787642899e+104 1.868517529275615e+140 -2.5024214599876482e+172): 1
* [misc]none:  (1.5276944825842992e+272 2.1335024129380783e-97 1.0953112641111952e+229): 0
* [misc]none:  (3.2587696828142436e+75 -1.5310860302360472e-220 3.7735141958833343e+170): 0
* [misc]none:  (1.0233799517176219e-267 -9.329140131915071e-38 5.348181441205713e-277): 1
* [misc]none:  (-5.024170449312866e+115 -1.611431508373217e+195 2.6631876145177815e-299): 1
* [misc]none:  (-1.3496423811442664e+228 -6.4194246582119476e+212 -6.796944270882852e-34): 1
* [misc]none:  (1.4781375733319608e-242 -2.1294463337627754e-19 3.003847336951168e+42): 0
* [misc]none:  (1.6609596531041104e-183 -6.156933300042242e+249 -2.249022094261578e+256): 0
* [misc]none:  (-4.347828572616086e-184 -2.2415468254308968e-275 5.41731325733976e-115): 2
* [misc]none:  (1.0395093493101161e-28 -6.035695609668586e-193 5.540829799846932e-307): 1
* [misc]none:  (-6.2448878184443784e-195 8.949756960721031e-195 2.722605535602291e+155): 0
* [misc]none:  (-4.714069429956778e+287 2.9453252035345084e+174 -5.843713571039491e+54): 1
* [misc]none:  (1.0160216232612932e-143 -2.425692316345541e+35 -2.0645141541195737e-123): 1
* [misc]none:  (4.178563936936926e-127 2.1657839461347663e+307 6.629963208070179e-180): 1
* [misc]none:  (-7.809772272521888e+231 -1.0023220030653375e-143 2.5453262068352747e+307): 1
* [misc]none:  (-1.1570938550413644e-156 1.7005338626981419e-143 7.808994559121766e-111): 1
* [misc]none:  (8.788013174305029e-230 -2.708463803258993e-217 2.5557776305939374e+86): 0
* [misc]none:  (-7.843719408056975e+200 -5.36699847063349e-281 -5.474411714258796e-200): 0
* [misc]none:  (3.2454192740264175e-113 4.896551008070313e-307 1.2607016124581028e+98): 0
* [misc]none:  (-2.1121060804534514e-153 -3.946147066150504e-295 6.351701463874224e-34): 1
* [misc]none:  (1.1127979592570306e-297 -1.1510973857640039e-232 -1.6396360397102689e+220): 0
* [misc]none:  (-4.631295923206326e+93 -3.257471673811612e-50 -8.226715035278119e-287): 1
* [misc]none:  (-2.255644969852512e+52 2.0134175477923286e-117 3.3910436622012204e+183): 0
* [misc]none:  (2.1370924660732585e-137 -1.9002484997441084e+30 5.027318832526334e+284): 0
* [misc]none:  (1.0214816826091913e+147 -2.018162200747419e+293 9.44950370602155e+215): 0
* [misc]none:  (1.453842915541268e+187 -2.867904353761743e+219 -2.421523337020965e+257): 2
* [misc]none:  (4.172324580820008e-133 1.6563474243613627e-33 -1.7776992082231396e+54): 0
* [misc]none:  (-1.628700320265257e-151 2.0971939106770033e-216 -1.434814592155953e+91): 0
* [misc]none:  (1.504878381563487e-123 -3.141023895275641e+245 -3.001476290410935e-269): 1
* [misc]none:  (8.06210226572923e-308 1.3704592194822044e+306 1.5354587375460247e+100): 0
* [misc]none:  (-4.31661667731193e-265 2.0724540688985427e-14 7.930730410937821e+23): 0
* [misc]none:  (1.2219765589404705e+117 -2.933277138800709e+90 4.8815870270916733e+188): 2
* [misc]none:  (-1.5358179930137542e+240 -4.258931337566508e+98 -1.144012682699149e-39): 0
* [misc]none:  (6.537529222720653e-92 -1.945641295132362e+247 -2.0251187412162225e-215): 1
* [misc]none:  (3.5709688782890513e-43 4.870593988390179e-194 5.0297272719312193e+287): 0
* [misc]none:  (-4.2293501993920744e-96 -2.936155159322882e+301 -7.874126038339784e+73): 0
* [misc]none:  (-2.0493644688447925e+84 5.027897585816787e-27 -3.868283935462521e-278): 0
* [misc]none:  (0.3310558223342685 -7.980090992758681e-50 -1.0048785011627561e-129): 1
* [misc]none:  (8.127248813391785e+226 -1.483643755550628e-284 -2.8769042098391767e+238): 0
* [misc]none:  (-1.2522521950389272e-257 7.299372666988037e-80 3.506434173585025e+201): 0
* [misc]none:  (1.1750256677114723e+302 1.7531612809893653e+136 8.844853331262414e+38): 1
* [misc]none:  (1.178943808525994e-266 9.178781884958768e+207 1.0483964125162862e-06): 0
* [misc]none:  (-3.752236763580095e-230 8.105463665693362e-194 -2.7685933486986245e+247): 0
* [misc]none:  (3.9135950474809954e+67 -2.028037433935809e-224 -3.943510659225903e+212): 2
* [misc]none:  (8.87668088957479e+21 4.513009124607983e-82 -1.952161770664997e+168): 1
* [misc]none:  (-3.2026896500136593e+106 3.9964248706286793e+300 4.3776582898304966e+81): 0
* [misc]none:  (1.5274484190953342e-17 -2.5573519175490938e+242 -7.753367484782891e-85): 1
* [misc]none:  (-1.7158977874206925e-283 -1.532955510659015e-241 3.0568938748675284e-154): 0
* [misc]none:  (2.0291756699515804e-73 8.435011553475053e-247 -8.143702901727175e-109): 1
* [misc]none:  (1.2307420681126962e+74 2.4920454965720488e-241 -1.1022915791865336e+23): 1
* [misc]none:  (-4.4511831232730076e-54 6.667510734837939e+231 -5.374019621331118e+178): 0
* [misc]none:  (8.63476246502244e-94 1.1480211985789131e-156 4.954650634110254e+246): 0
* [misc]none:  (-4.9266537053540385e-269 4.091190676322657e-21 -4.404055326509536e-182): 1
* [misc]none:  (-1.5576281112600038e-142 -3.785849338481499e+20 -3.2892975748009025e-252): 0
* [misc]none:  (-6.133557683770476e-223 -1.497130859851894e+57 3.826166416762639e+216): 0
* [misc]none:  (1.1663715170234023e-33 1.821316082219445e-31 -1.441560479175162e+51): 2
* [misc]none:  (-4.8973687170160837e+185 5.965572216773997e-266 -1.7112087034006054e+282): 1
* [misc]none:  (-8.627178870504794e+293 1.1867578517998852e-122 -1.1961490139198145e+35): 1
* [misc]none:  (4.388887965185748e-231 -3.990775770507464e-143 12041477.739790332): 0
* [misc]none:  (-1.3991744780612765e+87 -1.8538245512787994e+136 4.053980966469101e+302): 0
* [misc]none:  (2.8402608015100704e-250 -1348564663705.779 -4.759757548074155e+194): 0
* [misc]none:  (4.52129342202891e+175 -1.6048248782469113e+61 -3.969668283468194e-23): 0
* [misc]none:  (5.258242405229196e-247 -9.498386678851063e-197 -1.0709835258895982e+166): 0
* [misc]none:  (2.0947420887546095e+247 -3.0889064673505896e+234 -8.244426084214624e-140): 0
* [misc]none:  (2.1503851256841087e+121 2.5076686139270383e-164 -0.0022300046209729825): 1
* [misc]none:  (1.194061872367895e+220 1.0389358047373285e-37 -2.0087808485765453e-304): 1
* [misc]none:  (1.3687590050193055e-147 -8.234756399670311e-72 1.6542751192792692e-300): 1
* [misc]none:  (-4.773347848801604e-165 -3.5335037548803817e-216 2.602023429993787e-14): 1
* [misc]none:  (-1.4942418769123512e-302 -1.6037432475041464e-152 2.415026600632841e-155): 4
* [misc]none:  (-2.983618099380393e-19 6.08182357871597e-19 3.919727770092923e-28): 0
* [misc]none:  (-8.796417170933511e-157 2.5194286288656994e+137 -2.803376858595825e-183): 1
* [misc]none:  (1.2240297986851114e+251 3.45808714185781e+34 7.826697678487528e+235): 1
* [misc]none:  (-1.210994144233347e-198 -2.0317891841612197e-99 -6.22947928384665e-25): 0
* [misc]none:  (-4.152794278830264e-202 -2.9721370995696006e-116 3.1150480705854042e+199): 0
* [misc]none:  (-1.1101608934114058e+37 5.160642497006506e-106 2.501487961589971e-186): 1
* [misc]none:  (-1.8295893302806206e-270 3.1707458428990324e-50 1.882634228916084e+104): 0
* [misc]none:  (6.309071689177259e-279 1.6670391926080915e+97 1.5332802818158087e+215): 0
* [misc]none:  (-1.0118756898573112e+168 -2.1001979573866983e-194 -4.555748018209325e-271): 0
* [misc]none:  (1.7527084173765072e+214 -3.566410115265179e+77 -2.0754253193237223e+276): 0
* [misc]none:  (1.4185317245467992e+152 -1.3311644893547746e+182 -4.3053676243877875e-107): 1
* [misc]none:  (-2.7534409364060876e-300 -3.678907798082827e-113 6.040835984474006e+24): 0
* [misc]none:  (-3.1450504266029292e+299 -6.998469069018224e-161 -7.470113998819676e+275): 1
* [misc]none:  (-1.8796565426908664e+204 -1.099557535291122e-30 -2.3724946872194442e+266): 4
* [misc]none:  (-9.99618015977074e-100 -5.970362695291997e+22 -3.879179322621676e+202): 0
* [misc]none:  (3.321782785676469e-255 1.5087150874010425e-211 -1.7358857320695963e-267): 1
* [misc]none:  (-1.2383129644834284e+160 -1.062164837135673e+42 2.2752166795075178e+129): 0
* [misc]none:  (3.459069485774471e+125 6.125263020847728e+200 1.0472163764779166e+211): 1
* [misc]none:  (-5.593167094268887e-190 1.7800753731525426e+39 -1.9563965618862005e+178): 0
* [misc]none:  (6.863804525144902e-237 1.2654352929763856e+201 3.676700438802301e-44): 0
* [misc]none:  (-4.5884699527721836e-114 5.519538337069105e+160 -3.884002241527716e-09): 0
* [misc]none:  (3.402956999639796e+258 1.529772447679324e+286 -3.3684544179202395e+273): 1
* [misc]none:  (-7.667160800564504e+201 -1.714192033762561e-105 -3.946016692023138e+286): 1
* [misc]none:  (1.8500142756663922e+65 6.180426682633145e-231 -1.1261653603541554e-107): 1
* [misc]none:  (-2.1793389213345715e+300 1.0083640164314813e-92 6.223068053793711e+127): 1
* [misc]none:  (2.2629994924347574e-07 -3.779843999226174e+139 -3.0614286694593404e-08): 2
* [misc]none:  (-5.8394743012211145e+230 -3.7587461773373327e+104 -1.0123667364292686e-192): 1
* [misc]none:  (-9.804519419015677e-288 -6.5890526844687485e-164 -2.899016522178297e+88): 0
* [misc]none:  (3.6950126077692746e-159 -1.0679075438337597e+159 2.659181518527327e+307): 0
* [misc]none:  (4.6359994596022095e-153 -1.3879444027553083e+305 8.584176116472669): 2
* [misc]none:  (3.802591719422796e-187 -8.074991766140518e+140 1.5800617558402157e+234): 0
* [misc]none:  (1.1606607614301422e-05 3.292067705150785e-57 -1.5601971401908854e-158): 1
* [misc]none:  (3.2577820155263023e+228 -5.2844454198705195e+305 7.723034435941923e+280): 0
* [misc]none:  (-1.0201482567312647e+227 2.333964054476269e-230 2.6282948365587408e-27): 1
* [misc]none:  (-5.91489283060648e-141 -2.941458472796967e-142 2.1831432166025805e+27): 0
* [misc]none:  (1.0985453227849344e-170 -5.571663930953366e+284 -8.610351411523465e+21): 0
* [misc]none:  (2.9274193921182663e+72 3.528685173788366e+131 -3.755398726662252e-104): 1
* [misc]none:  (1.732956797107532e+257 -0.003996887291900194 -3.319613025041288e+219): 1
* [misc]none:  (-2.8353852455895346e-236 2.4977177539308356e+32 6.19863515953618e-206): 1
* [misc]none:  (-6.234997468933024e+98 -1.2483206863621665e-82 -4.3245428365292906e-97): 0
* [misc]none:  (3.1166104193766994e-137 -2.3678767156364688e+110 -3.8121763850001037e+300): 0
* [misc]none:  (9.15071959046392e+15 -5.982768696796655e-301 1.4133605543126447e+178): 0
* [misc]none:  (-5.6835404426458884e-130 -6.116012871916241e+32 -4.56282292938935e+200): 0
* [misc]none:  (4.015919715899847e+137 1.2423686537018865e-16 -2.9190823764550885e+200): 1
* [misc]none:  (-8.369149872118526e+18 -6.505453409904161e-156 -1.571835822103132e-97): 1
* [misc]none:  (-2.3015506367476294e+261 4.559321205979136e-29 8.913124246398817e-290): 0
* [misc]none:  (-1.7739145562626414e-238 -7.800592841851725e-167 -7.036042050158767e-21): 0
* [misc]none:  (220237823157837.84 -1.0913289326464034e+189 -8.082418571799865e-207): 1
* [misc]none:  (4.4061588303824944e-303 -1.003094753737015e-245 2.971068685413927e+215): 0
* [misc]none:  (-4.9172013791785835e+247 3.20782828662563e+47 -1.3139682089382477e-268): 1
* [misc]none:  (-7.0800974540359565e-196 -1.0695941285170777e+259 2.3040347636911724e-27): 0
* [misc]none:  (7.527413299194134e-199 3.222113461096366e+139 9.80786621090237e-10): 0
* [misc]none:  (-6.984190141903233e+241 -9.583105380205228e+81 -1.1006480359267765e-71): 1
* [misc]none:  (4.5779060099920917e-17 8.583739956121865e-308 -3.5994403684981127e-10): 1
* [misc]none:  (-1.9722299820001865e+94 4.460218679195514e-149 5.690021676770787e+31): 0
* [misc]none:  (5.357335632184978e-22 9.84912431615415e+293 -5.955853021225728e-91): 1
* [misc]none:  (2.236333776084836e+240 8.787526117599876e+89 6.103872924194278e-110): 1
* [misc]none:  (-8.022655362628393e+40 -4.497266801596471e+100 2.4991141371272513e-282): 3
* [misc]none:  (2.4069680102931362e+144 -2.8732816710350813e-128 0.0006145505508753878): 1
* [misc]none:  (5.770600846660463e-216 2.781426133815738e-217 2.5557241024046246e-63): 1
* [misc]none:  (4.40681776351873e+173 -4.1462345069686375e+92 5.223765227005569e-152): 1
* [misc]none:  (-1.6334098586809e+149 -7.52056490230671e+247 7.351668255412019e-155): 0
* [misc]none:  (-5.755383151195205e+172 3.666021857234008e-105 -7.362277309884386e+163): 1
* [misc]none:  (2.1884482458744437e-81 7.345575675668017e+18 -5.064289876067956e+27): 1
* [misc]none:  (8.853831150429422e+166 1.8423314112002953e-90 -2.820439640817216e+236): 1
* [misc]none:  (2.5619404272463737e+146 -5.680359460857034e-50 2.9488263936935035e+118): 1
* [misc]none:  (1.4318039063168714e-09 -5.668682219996358e+270 9.534360742444564e-26): 1
* [misc]none:  (1.2538968992553631e-96 1.2604501780655313e-299 33610193246.41273): 3
* [misc]none:  (-4.7269786251670094e+219 9.689801239106332e+272 2.3118053548193494e+30): 1
* [misc]none:  (-5.491093062090541e+163 4.652749385182812e-160 9.610215461209792e+222): 0
* [misc]none:  All alt indices
* [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) (* (* (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))))))): 1
* [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)))))): 2
* [misc]none:  (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 3
* [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))))): 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:  (9.568527921939742e-273 2.654414227492494e+20 1.7090726067739176e-227): 0
* [misc]none:  (7.696162327562603e-152 -1.7235772956324157e+44 -1.849105607217708e-205): 0
* [misc]none:  (5.106850318067203e-223 -8.776422694060002e-191 -1.0339801069916732e-122): 2
* [misc]none:  (1.3381086996667414e-215 -1.2294460237484715e+92 -9.903617261398821e+48): 0
* [misc]none:  (1.0224180420716733e-52 -5.2868600650398754e+73 9.705038014433044e-175): 0
* [misc]none:  (-2.2377664482363495e-145 -6.863248801263982e-282 6.028770352690154e-151): 0
* [misc]none:  (-425.15997261130053 -1.4215485644178288e+122 6.224141164637054e+75): 0
* [misc]none:  (-1.2086624476009651e-200 2.3623052767393814e+153 4.4633600804799425e+142): 0
* [misc]none:  (-1.6813749551547664e-222 -4.6390246315423324e+36 1.2790861077923577e+68): 0
* [misc]none:  (1.0592112097552954e+143 -7.191398511280425e-59 -2.3255237224962407e-56): 0
* [misc]none:  (1.6780592368033288e-262 1.5331200777386884e+269 2.973444851318118e-169): 0
* [misc]none:  (1.6828576275377584e-98 4.5525663232975395e+86 4.922686678959719e-213): 0
* [misc]none:  (9.601043864442096e+176 5.752669291865014e-257 3.0310347416413137e-258): 0
* [misc]none:  (-1.1043473204259838e-123 -2.06284826271339e+143 -7.24722487096989e+250): 0
* [misc]none:  (-2.2793842908096357e+72 -8.124520965103743e+145 3.727663855470157e+254): 0
* [misc]none:  (8.775974517752829e+204 -644684.1881687096 -5.072621494700167e+267): 0
* [misc]none:  (-4.473451124127099e-235 1.5758037123807388e+87 -3.1154131766396667e+29): 0
* [misc]none:  (2.4492953260422185e+131 5.835395598392501e+198 -1.2951522948212234e+105): 0
* [misc]none:  (2.2545095115116114e+189 -1.4107789582096962e+111 -4.521345173807944e-274): 0
* [misc]none:  (2.4757193927168845e-307 -3.9546390943242443e-82 1.457018723838865e-35): 0
* [misc]none:  (-1.5246504675906286e-147 -1.1042460154015769e-187 -3.30379604621756e-180): 0
* [misc]none:  (-8.185062082112633e+221 9.424239481611678e-294 1.5096638452158614e-71): 0
* [misc]none:  (-1.830572871972773e-27 -1.714392276509888e-289 -9.870003932393336e-46): 0
* [misc]none:  (-2.2727962542731896e+253 6.967234360883543e-112 2.0770495361468835e+203): 0
* [misc]none:  (-3.5348879909542174e+259 3.1401318723071353e-131 -1.4852188300484065e-239): 0
* [misc]none:  (-3.374264737975756e+72 -1.0890756353988414e+102 0.228970627026966): 0
* [misc]none:  (8.40469635347052e+100 2.1321881547753267e-44 1.7739584018359304e-207): 0
* [misc]none:  (-2.723194185823719e-255 6.866799226360426e-109 6.417434319517234e+231): 0
* [misc]none:  (-1.105123941463264e-44 -1.5442050061781137e-296 -2.5125878605191734e-29): 4
* [misc]none:  (4.508352673437809e+248 -1.4801509312754967e-61 -5.163900824605852e+32): 0
* [misc]none:  (1.430295312965348e-149 3.112001531242655e+80 3.0475240801607222e-148): 0
* [misc]none:  (-5.232709143225968e-98 -2.6904647286120434e+306 -2.4014893155423993e+35): 0
* [misc]none:  (1.4966275592591335e-123 6.384545099874781e-168 -1.9863653303691194e-296): 0
* [misc]none:  (-1.5110806788081036e+47 4.232269734875141e-205 4.1020469956028986e+24): 0
* [misc]none:  (2.1703230086091624e+277 -4.725142043601307e-47 2.68866513359689e-174): 0
* [misc]none:  (8.96636707501737e-13 -2.3580830331388543e-23 1.6082525618587168e-259): 0
* [misc]none:  (2.7230496615379425e-188 7.15832835948139e-179 -3.386296042382532e-190): 0
* [misc]none:  (2.991170371343952e+151 -7.407998779781806e-33 -7.014935371531484e-98): 0
* [misc]none:  (-2.580522918977788e+184 8.990843056511833e-32 3.9088008390110404e+59): 0
* [misc]none:  (6.754325943853309e-283 -1.0323836290065946e-292 -1.1379474227414984e+157): 0
* [misc]none:  (-4.747329706134133e-300 -2.266131068741548e-232 6.354961149716869e-97): 0
* [misc]none:  (2.8293820765322485e-296 5.3887495676776976e+171 -503507.16469484643): 0
* [misc]none:  (-1.9250288775511552e-19 9.871143682146977e-239 -1.9809585244792104e-221): 0
* [misc]none:  (-5.324127388080003e+141 5.123849747663666e+133 4.007761912625816e-148): 1
* [misc]none:  (3.321054281872602e+251 -7.33347091133757e-103 -3.967500572333352e+95): 0
* [misc]none:  (-8.002576117532625e+293 -344.7442723289036 8.452539306620761e+219): 0
* [misc]none:  (-3.8897511496224356e+161 4.4485313287564445e+252 -2.9971297913067123e-296): 0
* [misc]none:  (1.120554825473697e-298 7.175557259725409e-49 4.4800031186106794e-70): 0
* [misc]none:  (-1.3609788364339258e+82 2.5265807746711182e-73 1.4440898226736705e-53): 0
* [misc]none:  (-4.651815532356965e+285 -1.223165056942955e+279 2.3912903471184356e-134): 0
* [misc]none:  (3.53511184703484e+158 -2.8955398952451435e+131 1.5780761566396397e+125): 0
* [misc]none:  (1.534059348183312e-189 2.8419420301747055e+90 -2.318158899615234e+28): 0
* [misc]none:  (8.976998414840432e+184 3.9122094377392414e+59 -6.588522440277298e+124): 0
* [misc]none:  (-8.890171102288788e+241 -4.517606044160453e-29 -2.0229301807644786e+90): 0
* [misc]none:  (4.588817619865515e-83 6.908716276621429e+42 1.074034252081928e-96): 0
* [misc]none:  (-2.0525626505030474e-205 1.43328810513268e+174 -3.517237475307537e+70): 0
* [misc]none:  (1.6570172448601563e-137 2.4048926517811354e+66 -1.2386076426807104e+281): 0
* [misc]none:  (4.0623211606609595e-228 1.5982222044177176e+181 8.398043771606399e+47): 0
* [misc]none:  (-6.552213310391902e+218 -2.461870212435176e+181 -9.04145577094214e-51): 0
* [misc]none:  (6.730955893129463e-197 6.724679859609688e-169 1.4230714989143866e-75): 0
* [misc]none:  (3.493084834288097e-125 -8.87002524437924e-05 -9.534297923953677e-238): 0
* [misc]none:  (8.932193317773552e+156 -4.82948997845691e+115 -2.844669102107347e+110): 0
* [misc]none:  (6.614130481633629e+300 -6.631482835790804e+75 -2.927893218629978e+198): 0
* [misc]none:  (-5.425958198218161e-146 -5.212281525360505e+119 1.3240207557849338e+291): 0
* [misc]none:  (-6.155236203506664e+276 3.2574885636926814e-211 -9.779940061204298e+60): 0
* [misc]none:  (1.3680169753287455e-53 -1.5172504298350683e-122 2.2957389429922706e-176): 0
* [misc]none:  (1.3610327499536486e+226 4.84788597345363e+32 1.0657402022625375e+129): 0
* [misc]none:  (-6.206729553564092e+301 1.7927880379985524e+252 -8.795577755360774e-193): 0
* [misc]none:  (1.0006462262322276e+238 -9.304691570184222e+30 1.9963004369674967e-80): 0
* [misc]none:  (1.4604179220567222e+231 1.5216315041338872e-218 1.6707151526371295e-190): 0
* [misc]none:  (5.1990169359560766e-256 -6.08679419260233e+77 -2.864119470500123e-178): 0
* [misc]none:  (-4.976800097081315e-07 8.044445972631143e-28 2.635030752287841e+186): 0
* [misc]none:  (4.12100928340286e-184 9.74865050931635e+298 -7.146083996729688e+199): 0
* [misc]none:  (8.361834195928021e-55 7.311006071291519e-101 -1.2254396192804965e-192): 0
* [misc]none:  (1.782256728493473e+35 6.657191501816709e+167 -1.0237963707243293e+257): 0
* [misc]none:  (-2.376464365888854e-78 -3.222114505301457e-163 -7.76766480776823e+37): 0
* [misc]none:  (8.382633428275648e-297 -6.191205901832185e+168 2.0703305241322436e+71): 0
* [misc]none:  (6.099737398723264e-279 2.6679523035634032e-104 8.366391802268445e+167): 0
* [misc]none:  (2.870509274337958e-101 -2.318802051809187e-21 -2.362056093523898e-236): 0
* [misc]none:  (4.384610242475067e+141 1.4474621781713568e+65 -1.410046620426318e-213): 0
* [misc]none:  (-4.423020421030483e+291 -3.178469867925502e-246 -7.447731371021966e+71): 0
* [misc]none:  (5.154503491655989e+241 -1.6398756117817188e+244 -5.198066934157678e+220): 0
* [misc]none:  (5.0588074473585105e-110 3.742291531299835e+250 5.013161881068948e+307): 0
* [misc]none:  (66089027839097.664 1.4351275309127672e-234 4.416557773834991e-25): 0
* [misc]none:  (-7.605311329977112e+177 3.0442880854679596e-31 -1.3989503218776358e-06): 0
* [misc]none:  (4.664141571059094e-118 -1.8512083623442292e+194 -1.3284106669669889e+173): 0
* [misc]none:  (1.0684729481870001e-64 6.3073426358942834e+75 -2.217199084242749e+17): 1
* [misc]none:  (3.1520683467019444e-71 0.19659739803111875 7.786539791485611e+181): 0
* [misc]none:  (2.4995037253728046e-268 -26830062846468156.0 4.637177905335891e-10): 0
* [misc]none:  (-12679727921.874447 8.652041834233969e-101 -3.577245999178336e-189): 0
* [misc]none:  (3.209451012414084e+270 3.7907433031673317e-256 8.76720870691781e-247): 0
* [misc]none:  (6.160331831501279e+241 -4.568727829143705e-23 -1.757665168464323e+292): 0
* [misc]none:  (-7.388307231162813e-47 3.4124175886179475e+199 3.0044088767799776e-30): 0
* [misc]none:  (4.7140908881238785e+103 2.3604863517900675e+30 6.476730028728146e-228): 0
* [misc]none:  (-1.2222609474395545e-52 3.369115258471057e+173 1.3383461391823352e+303): 0
* [misc]none:  (-2.6712990814490822e+247 2.3157792094796435e+174 -9.842315617180003e+283): 0
* [misc]none:  (-8.795626148255621e+120 -5.857596831984434e-95 4.097601147132013e-78): 0
* [misc]none:  (4.194634882433556e+107 -1.1526493241483084e+241 3.3390334975960143e-07): 1
* [misc]none:  (-1.8082167822566404e+183 2.2475155879831534e-92 -4.169290160322216e+246): 0
* [misc]none:  (1.030614327019319e-115 -3.2696794723802255e-27 1.8172920677413648e+103): 0
* [misc]none:  (-5.3218781381905035e-129 -2.362048596457182e+298 -6.16723792553022e+40): 0
* [misc]none:  (-2.40789942954366e+44 -2.9998533512328024e-144 -1.4147186694962813e-176): 0
* [misc]none:  (1.186346974675696e+155 -1.2827160692503531e+104 6.283729883572828e+84): 0
* [misc]none:  (3.6636765762957594e-187 1.7036347403091437e+117 9.645064592867311e+67): 0
* [misc]none:  (-5.1224941914889595e+118 1.3872947227834175e-251 7.12145855246931e-10): 0
* [misc]none:  (-4.3661371414490136e+281 -1.4301261995935981e+54 2.693461062117409e-112): 0
* [misc]none:  (1.6465279540530418e+78 2.43524332605807e-278 1.0576788912710565e-08): 0
* [misc]none:  (-17241.138101224224 4.764080499693186e-90 -7.290271346747531e-14): 0
* [misc]none:  (1.3557350350348342e+244 -1.3554385625614067e+48 -1.8946459759589086e-22): 0
* [misc]none:  (1.89639974853721e+92 8.2625435987749e+74 5.2790261762422465e+19): 0
* [misc]none:  (2.0179287053921742e+58 2.884705125857619e-274 2.031068672850261e-255): 0
* [misc]none:  (2.4294527094706238e+82 7.274711555473555e+146 1.5565784464325313e+71): 0
* [misc]none:  (1.2222184804619167e+37 -5.55277905008488e-191 -2.1360290498375943e+32): 0
* [misc]none:  (4.642568065399805e-260 -4.493058001076021e-21 -2.6740094065663153e+105): 0
* [misc]none:  (3.8347842435652736e+125 -9.848724265902522e+103 7.178809205583962e-175): 1
* [misc]none:  (-3.8059392134174312e-280 -3.954815085266754e+305 1.4235559851356953e-239): 0
* [misc]none:  (4.74667737826054e-29 -1.2486100740485319e+302 -143677164285.72263): 0
* [misc]none:  (-4.897389787642899e+104 1.868517529275615e+140 -2.5024214599876482e+172): 0
* [misc]none:  (1.5276944825842992e+272 2.1335024129380783e-97 1.0953112641111952e+229): 0
* [misc]none:  (3.2587696828142436e+75 -1.5310860302360472e-220 3.7735141958833343e+170): 0
* [misc]none:  (1.0233799517176219e-267 -9.329140131915071e-38 5.348181441205713e-277): 0
* [misc]none:  (-5.024170449312866e+115 -1.611431508373217e+195 2.6631876145177815e-299): 0
* [misc]none:  (-1.3496423811442664e+228 -6.4194246582119476e+212 -6.796944270882852e-34): 0
* [misc]none:  (1.4781375733319608e-242 -2.1294463337627754e-19 3.003847336951168e+42): 0
* [misc]none:  (1.6609596531041104e-183 -6.156933300042242e+249 -2.249022094261578e+256): 0
* [misc]none:  (-4.347828572616086e-184 -2.2415468254308968e-275 5.41731325733976e-115): 0
* [misc]none:  (1.0395093493101161e-28 -6.035695609668586e-193 5.540829799846932e-307): 0
* [misc]none:  (-6.2448878184443784e-195 8.949756960721031e-195 2.722605535602291e+155): 0
* [misc]none:  (-4.714069429956778e+287 2.9453252035345084e+174 -5.843713571039491e+54): 0
* [misc]none:  (1.0160216232612932e-143 -2.425692316345541e+35 -2.0645141541195737e-123): 0
* [misc]none:  (4.178563936936926e-127 2.1657839461347663e+307 6.629963208070179e-180): 0
* [misc]none:  (-7.809772272521888e+231 -1.0023220030653375e-143 2.5453262068352747e+307): 0
* [misc]none:  (-1.1570938550413644e-156 1.7005338626981419e-143 7.808994559121766e-111): 0
* [misc]none:  (8.788013174305029e-230 -2.708463803258993e-217 2.5557776305939374e+86): 0
* [misc]none:  (-7.843719408056975e+200 -5.36699847063349e-281 -5.474411714258796e-200): 0
* [misc]none:  (3.2454192740264175e-113 4.896551008070313e-307 1.2607016124581028e+98): 0
* [misc]none:  (-2.1121060804534514e-153 -3.946147066150504e-295 6.351701463874224e-34): 0
* [misc]none:  (1.1127979592570306e-297 -1.1510973857640039e-232 -1.6396360397102689e+220): 0
* [misc]none:  (-4.631295923206326e+93 -3.257471673811612e-50 -8.226715035278119e-287): 0
* [misc]none:  (-2.255644969852512e+52 2.0134175477923286e-117 3.3910436622012204e+183): 0
* [misc]none:  (2.1370924660732585e-137 -1.9002484997441084e+30 5.027318832526334e+284): 0
* [misc]none:  (1.0214816826091913e+147 -2.018162200747419e+293 9.44950370602155e+215): 0
* [misc]none:  (1.453842915541268e+187 -2.867904353761743e+219 -2.421523337020965e+257): 0
* [misc]none:  (4.172324580820008e-133 1.6563474243613627e-33 -1.7776992082231396e+54): 0
* [misc]none:  (-1.628700320265257e-151 2.0971939106770033e-216 -1.434814592155953e+91): 0
* [misc]none:  (1.504878381563487e-123 -3.141023895275641e+245 -3.001476290410935e-269): 0
* [misc]none:  (8.06210226572923e-308 1.3704592194822044e+306 1.5354587375460247e+100): 0
* [misc]none:  (-4.31661667731193e-265 2.0724540688985427e-14 7.930730410937821e+23): 0
* [misc]none:  (1.2219765589404705e+117 -2.933277138800709e+90 4.8815870270916733e+188): 0
* [misc]none:  (-1.5358179930137542e+240 -4.258931337566508e+98 -1.144012682699149e-39): 0
* [misc]none:  (6.537529222720653e-92 -1.945641295132362e+247 -2.0251187412162225e-215): 0
* [misc]none:  (3.5709688782890513e-43 4.870593988390179e-194 5.0297272719312193e+287): 0
* [misc]none:  (-4.2293501993920744e-96 -2.936155159322882e+301 -7.874126038339784e+73): 0
* [misc]none:  (-2.0493644688447925e+84 5.027897585816787e-27 -3.868283935462521e-278): 0
* [misc]none:  (0.3310558223342685 -7.980090992758681e-50 -1.0048785011627561e-129): 0
* [misc]none:  (8.127248813391785e+226 -1.483643755550628e-284 -2.8769042098391767e+238): 0
* [misc]none:  (-1.2522521950389272e-257 7.299372666988037e-80 3.506434173585025e+201): 0
* [misc]none:  (1.1750256677114723e+302 1.7531612809893653e+136 8.844853331262414e+38): 0
* [misc]none:  (1.178943808525994e-266 9.178781884958768e+207 1.0483964125162862e-06): 0
* [misc]none:  (-3.752236763580095e-230 8.105463665693362e-194 -2.7685933486986245e+247): 0
* [misc]none:  (3.9135950474809954e+67 -2.028037433935809e-224 -3.943510659225903e+212): 0
* [misc]none:  (8.87668088957479e+21 4.513009124607983e-82 -1.952161770664997e+168): 0
* [misc]none:  (-3.2026896500136593e+106 3.9964248706286793e+300 4.3776582898304966e+81): 0
* [misc]none:  (1.5274484190953342e-17 -2.5573519175490938e+242 -7.753367484782891e-85): 0
* [misc]none:  (-1.7158977874206925e-283 -1.532955510659015e-241 3.0568938748675284e-154): 0
* [misc]none:  (2.0291756699515804e-73 8.435011553475053e-247 -8.143702901727175e-109): 0
* [misc]none:  (1.2307420681126962e+74 2.4920454965720488e-241 -1.1022915791865336e+23): 0
* [misc]none:  (-4.4511831232730076e-54 6.667510734837939e+231 -5.374019621331118e+178): 0
* [misc]none:  (8.63476246502244e-94 1.1480211985789131e-156 4.954650634110254e+246): 0
* [misc]none:  (-4.9266537053540385e-269 4.091190676322657e-21 -4.404055326509536e-182): 0
* [misc]none:  (-1.5576281112600038e-142 -3.785849338481499e+20 -3.2892975748009025e-252): 0
* [misc]none:  (-6.133557683770476e-223 -1.497130859851894e+57 3.826166416762639e+216): 0
* [misc]none:  (1.1663715170234023e-33 1.821316082219445e-31 -1.441560479175162e+51): 3
* [misc]none:  (-4.8973687170160837e+185 5.965572216773997e-266 -1.7112087034006054e+282): 0
* [misc]none:  (-8.627178870504794e+293 1.1867578517998852e-122 -1.1961490139198145e+35): 0
* [misc]none:  (4.388887965185748e-231 -3.990775770507464e-143 12041477.739790332): 0
* [misc]none:  (-1.3991744780612765e+87 -1.8538245512787994e+136 4.053980966469101e+302): 0
* [misc]none:  (2.8402608015100704e-250 -1348564663705.779 -4.759757548074155e+194): 0
* [misc]none:  (4.52129342202891e+175 -1.6048248782469113e+61 -3.969668283468194e-23): 0
* [misc]none:  (5.258242405229196e-247 -9.498386678851063e-197 -1.0709835258895982e+166): 0
* [misc]none:  (2.0947420887546095e+247 -3.0889064673505896e+234 -8.244426084214624e-140): 0
* [misc]none:  (2.1503851256841087e+121 2.5076686139270383e-164 -0.0022300046209729825): 0
* [misc]none:  (1.194061872367895e+220 1.0389358047373285e-37 -2.0087808485765453e-304): 0
* [misc]none:  (1.3687590050193055e-147 -8.234756399670311e-72 1.6542751192792692e-300): 0
* [misc]none:  (-4.773347848801604e-165 -3.5335037548803817e-216 2.602023429993787e-14): 0
* [misc]none:  (-1.4942418769123512e-302 -1.6037432475041464e-152 2.415026600632841e-155): 0
* [misc]none:  (-2.983618099380393e-19 6.08182357871597e-19 3.919727770092923e-28): 0
* [misc]none:  (-8.796417170933511e-157 2.5194286288656994e+137 -2.803376858595825e-183): 0
* [misc]none:  (1.2240297986851114e+251 3.45808714185781e+34 7.826697678487528e+235): 0
* [misc]none:  (-1.210994144233347e-198 -2.0317891841612197e-99 -6.22947928384665e-25): 0
* [misc]none:  (-4.152794278830264e-202 -2.9721370995696006e-116 3.1150480705854042e+199): 0
* [misc]none:  (-1.1101608934114058e+37 5.160642497006506e-106 2.501487961589971e-186): 0
* [misc]none:  (-1.8295893302806206e-270 3.1707458428990324e-50 1.882634228916084e+104): 0
* [misc]none:  (6.309071689177259e-279 1.6670391926080915e+97 1.5332802818158087e+215): 0
* [misc]none:  (-1.0118756898573112e+168 -2.1001979573866983e-194 -4.555748018209325e-271): 0
* [misc]none:  (1.7527084173765072e+214 -3.566410115265179e+77 -2.0754253193237223e+276): 0
* [misc]none:  (1.4185317245467992e+152 -1.3311644893547746e+182 -4.3053676243877875e-107): 0
* [misc]none:  (-2.7534409364060876e-300 -3.678907798082827e-113 6.040835984474006e+24): 0
* [misc]none:  (-3.1450504266029292e+299 -6.998469069018224e-161 -7.470113998819676e+275): 0
* [misc]none:  (-1.8796565426908664e+204 -1.099557535291122e-30 -2.3724946872194442e+266): 5
* [misc]none:  (-9.99618015977074e-100 -5.970362695291997e+22 -3.879179322621676e+202): 0
* [misc]none:  (3.321782785676469e-255 1.5087150874010425e-211 -1.7358857320695963e-267): 0
* [misc]none:  (-1.2383129644834284e+160 -1.062164837135673e+42 2.2752166795075178e+129): 1
* [misc]none:  (3.459069485774471e+125 6.125263020847728e+200 1.0472163764779166e+211): 0
* [misc]none:  (-5.593167094268887e-190 1.7800753731525426e+39 -1.9563965618862005e+178): 0
* [misc]none:  (6.863804525144902e-237 1.2654352929763856e+201 3.676700438802301e-44): 0
* [misc]none:  (-4.5884699527721836e-114 5.519538337069105e+160 -3.884002241527716e-09): 0
* [misc]none:  (3.402956999639796e+258 1.529772447679324e+286 -3.3684544179202395e+273): 0
* [misc]none:  (-7.667160800564504e+201 -1.714192033762561e-105 -3.946016692023138e+286): 0
* [misc]none:  (1.8500142756663922e+65 6.180426682633145e-231 -1.1261653603541554e-107): 0
* [misc]none:  (-2.1793389213345715e+300 1.0083640164314813e-92 6.223068053793711e+127): 0
* [misc]none:  (2.2629994924347574e-07 -3.779843999226174e+139 -3.0614286694593404e-08): 0
* [misc]none:  (-5.8394743012211145e+230 -3.7587461773373327e+104 -1.0123667364292686e-192): 0
* [misc]none:  (-9.804519419015677e-288 -6.5890526844687485e-164 -2.899016522178297e+88): 0
* [misc]none:  (3.6950126077692746e-159 -1.0679075438337597e+159 2.659181518527327e+307): 0
* [misc]none:  (4.6359994596022095e-153 -1.3879444027553083e+305 8.584176116472669): 0
* [misc]none:  (3.802591719422796e-187 -8.074991766140518e+140 1.5800617558402157e+234): 0
* [misc]none:  (1.1606607614301422e-05 3.292067705150785e-57 -1.5601971401908854e-158): 0
* [misc]none:  (3.2577820155263023e+228 -5.2844454198705195e+305 7.723034435941923e+280): 0
* [misc]none:  (-1.0201482567312647e+227 2.333964054476269e-230 2.6282948365587408e-27): 0
* [misc]none:  (-5.91489283060648e-141 -2.941458472796967e-142 2.1831432166025805e+27): 0
* [misc]none:  (1.0985453227849344e-170 -5.571663930953366e+284 -8.610351411523465e+21): 0
* [misc]none:  (2.9274193921182663e+72 3.528685173788366e+131 -3.755398726662252e-104): 0
* [misc]none:  (1.732956797107532e+257 -0.003996887291900194 -3.319613025041288e+219): 0
* [misc]none:  (-2.8353852455895346e-236 2.4977177539308356e+32 6.19863515953618e-206): 0
* [misc]none:  (-6.234997468933024e+98 -1.2483206863621665e-82 -4.3245428365292906e-97): 0
* [misc]none:  (3.1166104193766994e-137 -2.3678767156364688e+110 -3.8121763850001037e+300): 0
* [misc]none:  (9.15071959046392e+15 -5.982768696796655e-301 1.4133605543126447e+178): 0
* [misc]none:  (-5.6835404426458884e-130 -6.116012871916241e+32 -4.56282292938935e+200): 0
* [misc]none:  (4.015919715899847e+137 1.2423686537018865e-16 -2.9190823764550885e+200): 0
* [misc]none:  (-8.369149872118526e+18 -6.505453409904161e-156 -1.571835822103132e-97): 0
* [misc]none:  (-2.3015506367476294e+261 4.559321205979136e-29 8.913124246398817e-290): 0
* [misc]none:  (-1.7739145562626414e-238 -7.800592841851725e-167 -7.036042050158767e-21): 0
* [misc]none:  (220237823157837.84 -1.0913289326464034e+189 -8.082418571799865e-207): 0
* [misc]none:  (4.4061588303824944e-303 -1.003094753737015e-245 2.971068685413927e+215): 0
* [misc]none:  (-4.9172013791785835e+247 3.20782828662563e+47 -1.3139682089382477e-268): 0
* [misc]none:  (-7.0800974540359565e-196 -1.0695941285170777e+259 2.3040347636911724e-27): 0
* [misc]none:  (7.527413299194134e-199 3.222113461096366e+139 9.80786621090237e-10): 0
* [misc]none:  (-6.984190141903233e+241 -9.583105380205228e+81 -1.1006480359267765e-71): 0
* [misc]none:  (4.5779060099920917e-17 8.583739956121865e-308 -3.5994403684981127e-10): 0
* [misc]none:  (-1.9722299820001865e+94 4.460218679195514e-149 5.690021676770787e+31): 0
* [misc]none:  (5.357335632184978e-22 9.84912431615415e+293 -5.955853021225728e-91): 0
* [misc]none:  (2.236333776084836e+240 8.787526117599876e+89 6.103872924194278e-110): 0
* [misc]none:  (-8.022655362628393e+40 -4.497266801596471e+100 2.4991141371272513e-282): 4
* [misc]none:  (2.4069680102931362e+144 -2.8732816710350813e-128 0.0006145505508753878): 0
* [misc]none:  (5.770600846660463e-216 2.781426133815738e-217 2.5557241024046246e-63): 0
* [misc]none:  (4.40681776351873e+173 -4.1462345069686375e+92 5.223765227005569e-152): 0
* [misc]none:  (-1.6334098586809e+149 -7.52056490230671e+247 7.351668255412019e-155): 0
* [misc]none:  (-5.755383151195205e+172 3.666021857234008e-105 -7.362277309884386e+163): 0
* [misc]none:  (2.1884482458744437e-81 7.345575675668017e+18 -5.064289876067956e+27): 0
* [misc]none:  (8.853831150429422e+166 1.8423314112002953e-90 -2.820439640817216e+236): 0
* [misc]none:  (2.5619404272463737e+146 -5.680359460857034e-50 2.9488263936935035e+118): 0
* [misc]none:  (1.4318039063168714e-09 -5.668682219996358e+270 9.534360742444564e-26): 0
* [misc]none:  (1.2538968992553631e-96 1.2604501780655313e-299 33610193246.41273): 0
* [misc]none:  (-4.7269786251670094e+219 9.689801239106332e+272 2.3118053548193494e+30): 0
* [misc]none:  (-5.491093062090541e+163 4.652749385182812e-160 9.610215461209792e+222): 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 3 / 4
* * * [misc]progress:  picking best candidate
* [misc]none:  Fresh alts: 4
* [misc]none:  All alts: 6
* [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) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* [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) (* (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 indices
* [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) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 1
* [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))))): 2
* [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))))))): 3
* [misc]none:  Best fresh alt per point
* [misc]none:  (9.568527921939742e-273 2.654414227492494e+20 1.7090726067739176e-227): 1
* [misc]none:  (7.696162327562603e-152 -1.7235772956324157e+44 -1.849105607217708e-205): 1
* [misc]none:  (5.106850318067203e-223 -8.776422694060002e-191 -1.0339801069916732e-122): 0
* [misc]none:  (1.3381086996667414e-215 -1.2294460237484715e+92 -9.903617261398821e+48): 0
* [misc]none:  (1.0224180420716733e-52 -5.2868600650398754e+73 9.705038014433044e-175): 1
* [misc]none:  (-2.2377664482363495e-145 -6.863248801263982e-282 6.028770352690154e-151): 1
* [misc]none:  (-425.15997261130053 -1.4215485644178288e+122 6.224141164637054e+75): 0
* [misc]none:  (-1.2086624476009651e-200 2.3623052767393814e+153 4.4633600804799425e+142): 0
* [misc]none:  (-1.6813749551547664e-222 -4.6390246315423324e+36 1.2790861077923577e+68): 0
* [misc]none:  (1.0592112097552954e+143 -7.191398511280425e-59 -2.3255237224962407e-56): 1
* [misc]none:  (1.6780592368033288e-262 1.5331200777386884e+269 2.973444851318118e-169): 0
* [misc]none:  (1.6828576275377584e-98 4.5525663232975395e+86 4.922686678959719e-213): 0
* [misc]none:  (9.601043864442096e+176 5.752669291865014e-257 3.0310347416413137e-258): 1
* [misc]none:  (-1.1043473204259838e-123 -2.06284826271339e+143 -7.24722487096989e+250): 0
* [misc]none:  (-2.2793842908096357e+72 -8.124520965103743e+145 3.727663855470157e+254): 0
* [misc]none:  (8.775974517752829e+204 -644684.1881687096 -5.072621494700167e+267): 3
* [misc]none:  (-4.473451124127099e-235 1.5758037123807388e+87 -3.1154131766396667e+29): 0
* [misc]none:  (2.4492953260422185e+131 5.835395598392501e+198 -1.2951522948212234e+105): 1
* [misc]none:  (2.2545095115116114e+189 -1.4107789582096962e+111 -4.521345173807944e-274): 0
* [misc]none:  (2.4757193927168845e-307 -3.9546390943242443e-82 1.457018723838865e-35): 0
* [misc]none:  (-1.5246504675906286e-147 -1.1042460154015769e-187 -3.30379604621756e-180): 1
* [misc]none:  (-8.185062082112633e+221 9.424239481611678e-294 1.5096638452158614e-71): 0
* [misc]none:  (-1.830572871972773e-27 -1.714392276509888e-289 -9.870003932393336e-46): 1
* [misc]none:  (-2.2727962542731896e+253 6.967234360883543e-112 2.0770495361468835e+203): 1
* [misc]none:  (-3.5348879909542174e+259 3.1401318723071353e-131 -1.4852188300484065e-239): 1
* [misc]none:  (-3.374264737975756e+72 -1.0890756353988414e+102 0.228970627026966): 1
* [misc]none:  (8.40469635347052e+100 2.1321881547753267e-44 1.7739584018359304e-207): 1
* [misc]none:  (-2.723194185823719e-255 6.866799226360426e-109 6.417434319517234e+231): 0
* [misc]none:  (-1.105123941463264e-44 -1.5442050061781137e-296 -2.5125878605191734e-29): 2
* [misc]none:  (4.508352673437809e+248 -1.4801509312754967e-61 -5.163900824605852e+32): 1
* [misc]none:  (1.430295312965348e-149 3.112001531242655e+80 3.0475240801607222e-148): 1
* [misc]none:  (-5.232709143225968e-98 -2.6904647286120434e+306 -2.4014893155423993e+35): 0
* [misc]none:  (1.4966275592591335e-123 6.384545099874781e-168 -1.9863653303691194e-296): 1
* [misc]none:  (-1.5110806788081036e+47 4.232269734875141e-205 4.1020469956028986e+24): 1
* [misc]none:  (2.1703230086091624e+277 -4.725142043601307e-47 2.68866513359689e-174): 1
* [misc]none:  (8.96636707501737e-13 -2.3580830331388543e-23 1.6082525618587168e-259): 1
* [misc]none:  (2.7230496615379425e-188 7.15832835948139e-179 -3.386296042382532e-190): 1
* [misc]none:  (2.991170371343952e+151 -7.407998779781806e-33 -7.014935371531484e-98): 1
* [misc]none:  (-2.580522918977788e+184 8.990843056511833e-32 3.9088008390110404e+59): 1
* [misc]none:  (6.754325943853309e-283 -1.0323836290065946e-292 -1.1379474227414984e+157): 0
* [misc]none:  (-4.747329706134133e-300 -2.266131068741548e-232 6.354961149716869e-97): 0
* [misc]none:  (2.8293820765322485e-296 5.3887495676776976e+171 -503507.16469484643): 0
* [misc]none:  (-1.9250288775511552e-19 9.871143682146977e-239 -1.9809585244792104e-221): 1
* [misc]none:  (-5.324127388080003e+141 5.123849747663666e+133 4.007761912625816e-148): 0
* [misc]none:  (3.321054281872602e+251 -7.33347091133757e-103 -3.967500572333352e+95): 1
* [misc]none:  (-8.002576117532625e+293 -344.7442723289036 8.452539306620761e+219): 1
* [misc]none:  (-3.8897511496224356e+161 4.4485313287564445e+252 -2.9971297913067123e-296): 0
* [misc]none:  (1.120554825473697e-298 7.175557259725409e-49 4.4800031186106794e-70): 0
* [misc]none:  (-1.3609788364339258e+82 2.5265807746711182e-73 1.4440898226736705e-53): 1
* [misc]none:  (-4.651815532356965e+285 -1.223165056942955e+279 2.3912903471184356e-134): 1
* [misc]none:  (3.53511184703484e+158 -2.8955398952451435e+131 1.5780761566396397e+125): 1
* [misc]none:  (1.534059348183312e-189 2.8419420301747055e+90 -2.318158899615234e+28): 0
* [misc]none:  (8.976998414840432e+184 3.9122094377392414e+59 -6.588522440277298e+124): 1
* [misc]none:  (-8.890171102288788e+241 -4.517606044160453e-29 -2.0229301807644786e+90): 1
* [misc]none:  (4.588817619865515e-83 6.908716276621429e+42 1.074034252081928e-96): 1
* [misc]none:  (-2.0525626505030474e-205 1.43328810513268e+174 -3.517237475307537e+70): 0
* [misc]none:  (1.6570172448601563e-137 2.4048926517811354e+66 -1.2386076426807104e+281): 0
* [misc]none:  (4.0623211606609595e-228 1.5982222044177176e+181 8.398043771606399e+47): 0
* [misc]none:  (-6.552213310391902e+218 -2.461870212435176e+181 -9.04145577094214e-51): 1
* [misc]none:  (6.730955893129463e-197 6.724679859609688e-169 1.4230714989143866e-75): 0
* [misc]none:  (3.493084834288097e-125 -8.87002524437924e-05 -9.534297923953677e-238): 1
* [misc]none:  (8.932193317773552e+156 -4.82948997845691e+115 -2.844669102107347e+110): 1
* [misc]none:  (6.614130481633629e+300 -6.631482835790804e+75 -2.927893218629978e+198): 1
* [misc]none:  (-5.425958198218161e-146 -5.212281525360505e+119 1.3240207557849338e+291): 0
* [misc]none:  (-6.155236203506664e+276 3.2574885636926814e-211 -9.779940061204298e+60): 1
* [misc]none:  (1.3680169753287455e-53 -1.5172504298350683e-122 2.2957389429922706e-176): 1
* [misc]none:  (1.3610327499536486e+226 4.84788597345363e+32 1.0657402022625375e+129): 1
* [misc]none:  (-6.206729553564092e+301 1.7927880379985524e+252 -8.795577755360774e-193): 1
* [misc]none:  (1.0006462262322276e+238 -9.304691570184222e+30 1.9963004369674967e-80): 0
* [misc]none:  (1.4604179220567222e+231 1.5216315041338872e-218 1.6707151526371295e-190): 0
* [misc]none:  (5.1990169359560766e-256 -6.08679419260233e+77 -2.864119470500123e-178): 1
* [misc]none:  (-4.976800097081315e-07 8.044445972631143e-28 2.635030752287841e+186): 0
* [misc]none:  (4.12100928340286e-184 9.74865050931635e+298 -7.146083996729688e+199): 0
* [misc]none:  (8.361834195928021e-55 7.311006071291519e-101 -1.2254396192804965e-192): 1
* [misc]none:  (1.782256728493473e+35 6.657191501816709e+167 -1.0237963707243293e+257): 0
* [misc]none:  (-2.376464365888854e-78 -3.222114505301457e-163 -7.76766480776823e+37): 1
* [misc]none:  (8.382633428275648e-297 -6.191205901832185e+168 2.0703305241322436e+71): 0
* [misc]none:  (6.099737398723264e-279 2.6679523035634032e-104 8.366391802268445e+167): 0
* [misc]none:  (2.870509274337958e-101 -2.318802051809187e-21 -2.362056093523898e-236): 1
* [misc]none:  (4.384610242475067e+141 1.4474621781713568e+65 -1.410046620426318e-213): 0
* [misc]none:  (-4.423020421030483e+291 -3.178469867925502e-246 -7.447731371021966e+71): 1
* [misc]none:  (5.154503491655989e+241 -1.6398756117817188e+244 -5.198066934157678e+220): 1
* [misc]none:  (5.0588074473585105e-110 3.742291531299835e+250 5.013161881068948e+307): 0
* [misc]none:  (66089027839097.664 1.4351275309127672e-234 4.416557773834991e-25): 1
* [misc]none:  (-7.605311329977112e+177 3.0442880854679596e-31 -1.3989503218776358e-06): 1
* [misc]none:  (4.664141571059094e-118 -1.8512083623442292e+194 -1.3284106669669889e+173): 0
* [misc]none:  (1.0684729481870001e-64 6.3073426358942834e+75 -2.217199084242749e+17): 0
* [misc]none:  (3.1520683467019444e-71 0.19659739803111875 7.786539791485611e+181): 0
* [misc]none:  (2.4995037253728046e-268 -26830062846468156.0 4.637177905335891e-10): 0
* [misc]none:  (-12679727921.874447 8.652041834233969e-101 -3.577245999178336e-189): 1
* [misc]none:  (3.209451012414084e+270 3.7907433031673317e-256 8.76720870691781e-247): 1
* [misc]none:  (6.160331831501279e+241 -4.568727829143705e-23 -1.757665168464323e+292): 0
* [misc]none:  (-7.388307231162813e-47 3.4124175886179475e+199 3.0044088767799776e-30): 2
* [misc]none:  (4.7140908881238785e+103 2.3604863517900675e+30 6.476730028728146e-228): 1
* [misc]none:  (-1.2222609474395545e-52 3.369115258471057e+173 1.3383461391823352e+303): 0
* [misc]none:  (-2.6712990814490822e+247 2.3157792094796435e+174 -9.842315617180003e+283): 1
* [misc]none:  (-8.795626148255621e+120 -5.857596831984434e-95 4.097601147132013e-78): 1
* [misc]none:  (4.194634882433556e+107 -1.1526493241483084e+241 3.3390334975960143e-07): 0
* [misc]none:  (-1.8082167822566404e+183 2.2475155879831534e-92 -4.169290160322216e+246): 0
* [misc]none:  (1.030614327019319e-115 -3.2696794723802255e-27 1.8172920677413648e+103): 0
* [misc]none:  (-5.3218781381905035e-129 -2.362048596457182e+298 -6.16723792553022e+40): 0
* [misc]none:  (-2.40789942954366e+44 -2.9998533512328024e-144 -1.4147186694962813e-176): 1
* [misc]none:  (1.186346974675696e+155 -1.2827160692503531e+104 6.283729883572828e+84): 0
* [misc]none:  (3.6636765762957594e-187 1.7036347403091437e+117 9.645064592867311e+67): 0
* [misc]none:  (-5.1224941914889595e+118 1.3872947227834175e-251 7.12145855246931e-10): 1
* [misc]none:  (-4.3661371414490136e+281 -1.4301261995935981e+54 2.693461062117409e-112): 1
* [misc]none:  (1.6465279540530418e+78 2.43524332605807e-278 1.0576788912710565e-08): 1
* [misc]none:  (-17241.138101224224 4.764080499693186e-90 -7.290271346747531e-14): 1
* [misc]none:  (1.3557350350348342e+244 -1.3554385625614067e+48 -1.8946459759589086e-22): 1
* [misc]none:  (1.89639974853721e+92 8.2625435987749e+74 5.2790261762422465e+19): 1
* [misc]none:  (2.0179287053921742e+58 2.884705125857619e-274 2.031068672850261e-255): 1
* [misc]none:  (2.4294527094706238e+82 7.274711555473555e+146 1.5565784464325313e+71): 1
* [misc]none:  (1.2222184804619167e+37 -5.55277905008488e-191 -2.1360290498375943e+32): 1
* [misc]none:  (4.642568065399805e-260 -4.493058001076021e-21 -2.6740094065663153e+105): 0
* [misc]none:  (3.8347842435652736e+125 -9.848724265902522e+103 7.178809205583962e-175): 0
* [misc]none:  (-3.8059392134174312e-280 -3.954815085266754e+305 1.4235559851356953e-239): 1
* [misc]none:  (4.74667737826054e-29 -1.2486100740485319e+302 -143677164285.72263): 3
* [misc]none:  (-4.897389787642899e+104 1.868517529275615e+140 -2.5024214599876482e+172): 1
* [misc]none:  (1.5276944825842992e+272 2.1335024129380783e-97 1.0953112641111952e+229): 0
* [misc]none:  (3.2587696828142436e+75 -1.5310860302360472e-220 3.7735141958833343e+170): 0
* [misc]none:  (1.0233799517176219e-267 -9.329140131915071e-38 5.348181441205713e-277): 1
* [misc]none:  (-5.024170449312866e+115 -1.611431508373217e+195 2.6631876145177815e-299): 1
* [misc]none:  (-1.3496423811442664e+228 -6.4194246582119476e+212 -6.796944270882852e-34): 1
* [misc]none:  (1.4781375733319608e-242 -2.1294463337627754e-19 3.003847336951168e+42): 0
* [misc]none:  (1.6609596531041104e-183 -6.156933300042242e+249 -2.249022094261578e+256): 0
* [misc]none:  (-4.347828572616086e-184 -2.2415468254308968e-275 5.41731325733976e-115): 1
* [misc]none:  (1.0395093493101161e-28 -6.035695609668586e-193 5.540829799846932e-307): 1
* [misc]none:  (-6.2448878184443784e-195 8.949756960721031e-195 2.722605535602291e+155): 0
* [misc]none:  (-4.714069429956778e+287 2.9453252035345084e+174 -5.843713571039491e+54): 1
* [misc]none:  (1.0160216232612932e-143 -2.425692316345541e+35 -2.0645141541195737e-123): 1
* [misc]none:  (4.178563936936926e-127 2.1657839461347663e+307 6.629963208070179e-180): 1
* [misc]none:  (-7.809772272521888e+231 -1.0023220030653375e-143 2.5453262068352747e+307): 1
* [misc]none:  (-1.1570938550413644e-156 1.7005338626981419e-143 7.808994559121766e-111): 3
* [misc]none:  (8.788013174305029e-230 -2.708463803258993e-217 2.5557776305939374e+86): 0
* [misc]none:  (-7.843719408056975e+200 -5.36699847063349e-281 -5.474411714258796e-200): 0
* [misc]none:  (3.2454192740264175e-113 4.896551008070313e-307 1.2607016124581028e+98): 0
* [misc]none:  (-2.1121060804534514e-153 -3.946147066150504e-295 6.351701463874224e-34): 3
* [misc]none:  (1.1127979592570306e-297 -1.1510973857640039e-232 -1.6396360397102689e+220): 0
* [misc]none:  (-4.631295923206326e+93 -3.257471673811612e-50 -8.226715035278119e-287): 1
* [misc]none:  (-2.255644969852512e+52 2.0134175477923286e-117 3.3910436622012204e+183): 0
* [misc]none:  (2.1370924660732585e-137 -1.9002484997441084e+30 5.027318832526334e+284): 0
* [misc]none:  (1.0214816826091913e+147 -2.018162200747419e+293 9.44950370602155e+215): 0
* [misc]none:  (1.453842915541268e+187 -2.867904353761743e+219 -2.421523337020965e+257): 1
* [misc]none:  (4.172324580820008e-133 1.6563474243613627e-33 -1.7776992082231396e+54): 0
* [misc]none:  (-1.628700320265257e-151 2.0971939106770033e-216 -1.434814592155953e+91): 0
* [misc]none:  (1.504878381563487e-123 -3.141023895275641e+245 -3.001476290410935e-269): 1
* [misc]none:  (8.06210226572923e-308 1.3704592194822044e+306 1.5354587375460247e+100): 0
* [misc]none:  (-4.31661667731193e-265 2.0724540688985427e-14 7.930730410937821e+23): 0
* [misc]none:  (1.2219765589404705e+117 -2.933277138800709e+90 4.8815870270916733e+188): 1
* [misc]none:  (-1.5358179930137542e+240 -4.258931337566508e+98 -1.144012682699149e-39): 0
* [misc]none:  (6.537529222720653e-92 -1.945641295132362e+247 -2.0251187412162225e-215): 1
* [misc]none:  (3.5709688782890513e-43 4.870593988390179e-194 5.0297272719312193e+287): 0
* [misc]none:  (-4.2293501993920744e-96 -2.936155159322882e+301 -7.874126038339784e+73): 0
* [misc]none:  (-2.0493644688447925e+84 5.027897585816787e-27 -3.868283935462521e-278): 0
* [misc]none:  (0.3310558223342685 -7.980090992758681e-50 -1.0048785011627561e-129): 1
* [misc]none:  (8.127248813391785e+226 -1.483643755550628e-284 -2.8769042098391767e+238): 0
* [misc]none:  (-1.2522521950389272e-257 7.299372666988037e-80 3.506434173585025e+201): 0
* [misc]none:  (1.1750256677114723e+302 1.7531612809893653e+136 8.844853331262414e+38): 1
* [misc]none:  (1.178943808525994e-266 9.178781884958768e+207 1.0483964125162862e-06): 0
* [misc]none:  (-3.752236763580095e-230 8.105463665693362e-194 -2.7685933486986245e+247): 0
* [misc]none:  (3.9135950474809954e+67 -2.028037433935809e-224 -3.943510659225903e+212): 1
* [misc]none:  (8.87668088957479e+21 4.513009124607983e-82 -1.952161770664997e+168): 1
* [misc]none:  (-3.2026896500136593e+106 3.9964248706286793e+300 4.3776582898304966e+81): 0
* [misc]none:  (1.5274484190953342e-17 -2.5573519175490938e+242 -7.753367484782891e-85): 1
* [misc]none:  (-1.7158977874206925e-283 -1.532955510659015e-241 3.0568938748675284e-154): 0
* [misc]none:  (2.0291756699515804e-73 8.435011553475053e-247 -8.143702901727175e-109): 1
* [misc]none:  (1.2307420681126962e+74 2.4920454965720488e-241 -1.1022915791865336e+23): 1
* [misc]none:  (-4.4511831232730076e-54 6.667510734837939e+231 -5.374019621331118e+178): 0
* [misc]none:  (8.63476246502244e-94 1.1480211985789131e-156 4.954650634110254e+246): 0
* [misc]none:  (-4.9266537053540385e-269 4.091190676322657e-21 -4.404055326509536e-182): 3
* [misc]none:  (-1.5576281112600038e-142 -3.785849338481499e+20 -3.2892975748009025e-252): 0
* [misc]none:  (-6.133557683770476e-223 -1.497130859851894e+57 3.826166416762639e+216): 0
* [misc]none:  (1.1663715170234023e-33 1.821316082219445e-31 -1.441560479175162e+51): 1
* [misc]none:  (-4.8973687170160837e+185 5.965572216773997e-266 -1.7112087034006054e+282): 1
* [misc]none:  (-8.627178870504794e+293 1.1867578517998852e-122 -1.1961490139198145e+35): 1
* [misc]none:  (4.388887965185748e-231 -3.990775770507464e-143 12041477.739790332): 0
* [misc]none:  (-1.3991744780612765e+87 -1.8538245512787994e+136 4.053980966469101e+302): 0
* [misc]none:  (2.8402608015100704e-250 -1348564663705.779 -4.759757548074155e+194): 0
* [misc]none:  (4.52129342202891e+175 -1.6048248782469113e+61 -3.969668283468194e-23): 0
* [misc]none:  (5.258242405229196e-247 -9.498386678851063e-197 -1.0709835258895982e+166): 0
* [misc]none:  (2.0947420887546095e+247 -3.0889064673505896e+234 -8.244426084214624e-140): 0
* [misc]none:  (2.1503851256841087e+121 2.5076686139270383e-164 -0.0022300046209729825): 1
* [misc]none:  (1.194061872367895e+220 1.0389358047373285e-37 -2.0087808485765453e-304): 1
* [misc]none:  (1.3687590050193055e-147 -8.234756399670311e-72 1.6542751192792692e-300): 1
* [misc]none:  (-4.773347848801604e-165 -3.5335037548803817e-216 2.602023429993787e-14): 1
* [misc]none:  (-1.4942418769123512e-302 -1.6037432475041464e-152 2.415026600632841e-155): 3
* [misc]none:  (-2.983618099380393e-19 6.08182357871597e-19 3.919727770092923e-28): 0
* [misc]none:  (-8.796417170933511e-157 2.5194286288656994e+137 -2.803376858595825e-183): 1
* [misc]none:  (1.2240297986851114e+251 3.45808714185781e+34 7.826697678487528e+235): 1
* [misc]none:  (-1.210994144233347e-198 -2.0317891841612197e-99 -6.22947928384665e-25): 0
* [misc]none:  (-4.152794278830264e-202 -2.9721370995696006e-116 3.1150480705854042e+199): 0
* [misc]none:  (-1.1101608934114058e+37 5.160642497006506e-106 2.501487961589971e-186): 1
* [misc]none:  (-1.8295893302806206e-270 3.1707458428990324e-50 1.882634228916084e+104): 0
* [misc]none:  (6.309071689177259e-279 1.6670391926080915e+97 1.5332802818158087e+215): 0
* [misc]none:  (-1.0118756898573112e+168 -2.1001979573866983e-194 -4.555748018209325e-271): 0
* [misc]none:  (1.7527084173765072e+214 -3.566410115265179e+77 -2.0754253193237223e+276): 0
* [misc]none:  (1.4185317245467992e+152 -1.3311644893547746e+182 -4.3053676243877875e-107): 1
* [misc]none:  (-2.7534409364060876e-300 -3.678907798082827e-113 6.040835984474006e+24): 0
* [misc]none:  (-3.1450504266029292e+299 -6.998469069018224e-161 -7.470113998819676e+275): 1
* [misc]none:  (-1.8796565426908664e+204 -1.099557535291122e-30 -2.3724946872194442e+266): 3
* [misc]none:  (-9.99618015977074e-100 -5.970362695291997e+22 -3.879179322621676e+202): 0
* [misc]none:  (3.321782785676469e-255 1.5087150874010425e-211 -1.7358857320695963e-267): 1
* [misc]none:  (-1.2383129644834284e+160 -1.062164837135673e+42 2.2752166795075178e+129): 0
* [misc]none:  (3.459069485774471e+125 6.125263020847728e+200 1.0472163764779166e+211): 0
* [misc]none:  (-5.593167094268887e-190 1.7800753731525426e+39 -1.9563965618862005e+178): 0
* [misc]none:  (6.863804525144902e-237 1.2654352929763856e+201 3.676700438802301e-44): 0
* [misc]none:  (-4.5884699527721836e-114 5.519538337069105e+160 -3.884002241527716e-09): 0
* [misc]none:  (3.402956999639796e+258 1.529772447679324e+286 -3.3684544179202395e+273): 1
* [misc]none:  (-7.667160800564504e+201 -1.714192033762561e-105 -3.946016692023138e+286): 0
* [misc]none:  (1.8500142756663922e+65 6.180426682633145e-231 -1.1261653603541554e-107): 1
* [misc]none:  (-2.1793389213345715e+300 1.0083640164314813e-92 6.223068053793711e+127): 1
* [misc]none:  (2.2629994924347574e-07 -3.779843999226174e+139 -3.0614286694593404e-08): 1
* [misc]none:  (-5.8394743012211145e+230 -3.7587461773373327e+104 -1.0123667364292686e-192): 1
* [misc]none:  (-9.804519419015677e-288 -6.5890526844687485e-164 -2.899016522178297e+88): 0
* [misc]none:  (3.6950126077692746e-159 -1.0679075438337597e+159 2.659181518527327e+307): 0
* [misc]none:  (4.6359994596022095e-153 -1.3879444027553083e+305 8.584176116472669): 1
* [misc]none:  (3.802591719422796e-187 -8.074991766140518e+140 1.5800617558402157e+234): 0
* [misc]none:  (1.1606607614301422e-05 3.292067705150785e-57 -1.5601971401908854e-158): 1
* [misc]none:  (3.2577820155263023e+228 -5.2844454198705195e+305 7.723034435941923e+280): 0
* [misc]none:  (-1.0201482567312647e+227 2.333964054476269e-230 2.6282948365587408e-27): 1
* [misc]none:  (-5.91489283060648e-141 -2.941458472796967e-142 2.1831432166025805e+27): 0
* [misc]none:  (1.0985453227849344e-170 -5.571663930953366e+284 -8.610351411523465e+21): 0
* [misc]none:  (2.9274193921182663e+72 3.528685173788366e+131 -3.755398726662252e-104): 1
* [misc]none:  (1.732956797107532e+257 -0.003996887291900194 -3.319613025041288e+219): 1
* [misc]none:  (-2.8353852455895346e-236 2.4977177539308356e+32 6.19863515953618e-206): 3
* [misc]none:  (-6.234997468933024e+98 -1.2483206863621665e-82 -4.3245428365292906e-97): 0
* [misc]none:  (3.1166104193766994e-137 -2.3678767156364688e+110 -3.8121763850001037e+300): 0
* [misc]none:  (9.15071959046392e+15 -5.982768696796655e-301 1.4133605543126447e+178): 0
* [misc]none:  (-5.6835404426458884e-130 -6.116012871916241e+32 -4.56282292938935e+200): 0
* [misc]none:  (4.015919715899847e+137 1.2423686537018865e-16 -2.9190823764550885e+200): 1
* [misc]none:  (-8.369149872118526e+18 -6.505453409904161e-156 -1.571835822103132e-97): 1
* [misc]none:  (-2.3015506367476294e+261 4.559321205979136e-29 8.913124246398817e-290): 0
* [misc]none:  (-1.7739145562626414e-238 -7.800592841851725e-167 -7.036042050158767e-21): 0
* [misc]none:  (220237823157837.84 -1.0913289326464034e+189 -8.082418571799865e-207): 1
* [misc]none:  (4.4061588303824944e-303 -1.003094753737015e-245 2.971068685413927e+215): 0
* [misc]none:  (-4.9172013791785835e+247 3.20782828662563e+47 -1.3139682089382477e-268): 1
* [misc]none:  (-7.0800974540359565e-196 -1.0695941285170777e+259 2.3040347636911724e-27): 0
* [misc]none:  (7.527413299194134e-199 3.222113461096366e+139 9.80786621090237e-10): 0
* [misc]none:  (-6.984190141903233e+241 -9.583105380205228e+81 -1.1006480359267765e-71): 1
* [misc]none:  (4.5779060099920917e-17 8.583739956121865e-308 -3.5994403684981127e-10): 1
* [misc]none:  (-1.9722299820001865e+94 4.460218679195514e-149 5.690021676770787e+31): 0
* [misc]none:  (5.357335632184978e-22 9.84912431615415e+293 -5.955853021225728e-91): 1
* [misc]none:  (2.236333776084836e+240 8.787526117599876e+89 6.103872924194278e-110): 1
* [misc]none:  (-8.022655362628393e+40 -4.497266801596471e+100 2.4991141371272513e-282): 2
* [misc]none:  (2.4069680102931362e+144 -2.8732816710350813e-128 0.0006145505508753878): 1
* [misc]none:  (5.770600846660463e-216 2.781426133815738e-217 2.5557241024046246e-63): 0
* [misc]none:  (4.40681776351873e+173 -4.1462345069686375e+92 5.223765227005569e-152): 1
* [misc]none:  (-1.6334098586809e+149 -7.52056490230671e+247 7.351668255412019e-155): 0
* [misc]none:  (-5.755383151195205e+172 3.666021857234008e-105 -7.362277309884386e+163): 1
* [misc]none:  (2.1884482458744437e-81 7.345575675668017e+18 -5.064289876067956e+27): 2
* [misc]none:  (8.853831150429422e+166 1.8423314112002953e-90 -2.820439640817216e+236): 0
* [misc]none:  (2.5619404272463737e+146 -5.680359460857034e-50 2.9488263936935035e+118): 1
* [misc]none:  (1.4318039063168714e-09 -5.668682219996358e+270 9.534360742444564e-26): 1
* [misc]none:  (1.2538968992553631e-96 1.2604501780655313e-299 33610193246.41273): 2
* [misc]none:  (-4.7269786251670094e+219 9.689801239106332e+272 2.3118053548193494e+30): 1
* [misc]none:  (-5.491093062090541e+163 4.652749385182812e-160 9.610215461209792e+222): 0
* [misc]none:  All alt indices
* [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) (* (* (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))))))): 1
* [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)))))): 2
* [misc]none:  (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 3
* [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))))): 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:  (9.568527921939742e-273 2.654414227492494e+20 1.7090726067739176e-227): 0
* [misc]none:  (7.696162327562603e-152 -1.7235772956324157e+44 -1.849105607217708e-205): 0
* [misc]none:  (5.106850318067203e-223 -8.776422694060002e-191 -1.0339801069916732e-122): 2
* [misc]none:  (1.3381086996667414e-215 -1.2294460237484715e+92 -9.903617261398821e+48): 0
* [misc]none:  (1.0224180420716733e-52 -5.2868600650398754e+73 9.705038014433044e-175): 0
* [misc]none:  (-2.2377664482363495e-145 -6.863248801263982e-282 6.028770352690154e-151): 0
* [misc]none:  (-425.15997261130053 -1.4215485644178288e+122 6.224141164637054e+75): 0
* [misc]none:  (-1.2086624476009651e-200 2.3623052767393814e+153 4.4633600804799425e+142): 0
* [misc]none:  (-1.6813749551547664e-222 -4.6390246315423324e+36 1.2790861077923577e+68): 0
* [misc]none:  (1.0592112097552954e+143 -7.191398511280425e-59 -2.3255237224962407e-56): 0
* [misc]none:  (1.6780592368033288e-262 1.5331200777386884e+269 2.973444851318118e-169): 0
* [misc]none:  (1.6828576275377584e-98 4.5525663232975395e+86 4.922686678959719e-213): 0
* [misc]none:  (9.601043864442096e+176 5.752669291865014e-257 3.0310347416413137e-258): 0
* [misc]none:  (-1.1043473204259838e-123 -2.06284826271339e+143 -7.24722487096989e+250): 0
* [misc]none:  (-2.2793842908096357e+72 -8.124520965103743e+145 3.727663855470157e+254): 0
* [misc]none:  (8.775974517752829e+204 -644684.1881687096 -5.072621494700167e+267): 0
* [misc]none:  (-4.473451124127099e-235 1.5758037123807388e+87 -3.1154131766396667e+29): 0
* [misc]none:  (2.4492953260422185e+131 5.835395598392501e+198 -1.2951522948212234e+105): 0
* [misc]none:  (2.2545095115116114e+189 -1.4107789582096962e+111 -4.521345173807944e-274): 0
* [misc]none:  (2.4757193927168845e-307 -3.9546390943242443e-82 1.457018723838865e-35): 0
* [misc]none:  (-1.5246504675906286e-147 -1.1042460154015769e-187 -3.30379604621756e-180): 0
* [misc]none:  (-8.185062082112633e+221 9.424239481611678e-294 1.5096638452158614e-71): 0
* [misc]none:  (-1.830572871972773e-27 -1.714392276509888e-289 -9.870003932393336e-46): 0
* [misc]none:  (-2.2727962542731896e+253 6.967234360883543e-112 2.0770495361468835e+203): 0
* [misc]none:  (-3.5348879909542174e+259 3.1401318723071353e-131 -1.4852188300484065e-239): 0
* [misc]none:  (-3.374264737975756e+72 -1.0890756353988414e+102 0.228970627026966): 0
* [misc]none:  (8.40469635347052e+100 2.1321881547753267e-44 1.7739584018359304e-207): 0
* [misc]none:  (-2.723194185823719e-255 6.866799226360426e-109 6.417434319517234e+231): 0
* [misc]none:  (-1.105123941463264e-44 -1.5442050061781137e-296 -2.5125878605191734e-29): 4
* [misc]none:  (4.508352673437809e+248 -1.4801509312754967e-61 -5.163900824605852e+32): 0
* [misc]none:  (1.430295312965348e-149 3.112001531242655e+80 3.0475240801607222e-148): 0
* [misc]none:  (-5.232709143225968e-98 -2.6904647286120434e+306 -2.4014893155423993e+35): 0
* [misc]none:  (1.4966275592591335e-123 6.384545099874781e-168 -1.9863653303691194e-296): 0
* [misc]none:  (-1.5110806788081036e+47 4.232269734875141e-205 4.1020469956028986e+24): 0
* [misc]none:  (2.1703230086091624e+277 -4.725142043601307e-47 2.68866513359689e-174): 0
* [misc]none:  (8.96636707501737e-13 -2.3580830331388543e-23 1.6082525618587168e-259): 0
* [misc]none:  (2.7230496615379425e-188 7.15832835948139e-179 -3.386296042382532e-190): 0
* [misc]none:  (2.991170371343952e+151 -7.407998779781806e-33 -7.014935371531484e-98): 0
* [misc]none:  (-2.580522918977788e+184 8.990843056511833e-32 3.9088008390110404e+59): 0
* [misc]none:  (6.754325943853309e-283 -1.0323836290065946e-292 -1.1379474227414984e+157): 0
* [misc]none:  (-4.747329706134133e-300 -2.266131068741548e-232 6.354961149716869e-97): 0
* [misc]none:  (2.8293820765322485e-296 5.3887495676776976e+171 -503507.16469484643): 0
* [misc]none:  (-1.9250288775511552e-19 9.871143682146977e-239 -1.9809585244792104e-221): 0
* [misc]none:  (-5.324127388080003e+141 5.123849747663666e+133 4.007761912625816e-148): 1
* [misc]none:  (3.321054281872602e+251 -7.33347091133757e-103 -3.967500572333352e+95): 0
* [misc]none:  (-8.002576117532625e+293 -344.7442723289036 8.452539306620761e+219): 0
* [misc]none:  (-3.8897511496224356e+161 4.4485313287564445e+252 -2.9971297913067123e-296): 0
* [misc]none:  (1.120554825473697e-298 7.175557259725409e-49 4.4800031186106794e-70): 0
* [misc]none:  (-1.3609788364339258e+82 2.5265807746711182e-73 1.4440898226736705e-53): 0
* [misc]none:  (-4.651815532356965e+285 -1.223165056942955e+279 2.3912903471184356e-134): 0
* [misc]none:  (3.53511184703484e+158 -2.8955398952451435e+131 1.5780761566396397e+125): 0
* [misc]none:  (1.534059348183312e-189 2.8419420301747055e+90 -2.318158899615234e+28): 0
* [misc]none:  (8.976998414840432e+184 3.9122094377392414e+59 -6.588522440277298e+124): 0
* [misc]none:  (-8.890171102288788e+241 -4.517606044160453e-29 -2.0229301807644786e+90): 0
* [misc]none:  (4.588817619865515e-83 6.908716276621429e+42 1.074034252081928e-96): 0
* [misc]none:  (-2.0525626505030474e-205 1.43328810513268e+174 -3.517237475307537e+70): 0
* [misc]none:  (1.6570172448601563e-137 2.4048926517811354e+66 -1.2386076426807104e+281): 0
* [misc]none:  (4.0623211606609595e-228 1.5982222044177176e+181 8.398043771606399e+47): 0
* [misc]none:  (-6.552213310391902e+218 -2.461870212435176e+181 -9.04145577094214e-51): 0
* [misc]none:  (6.730955893129463e-197 6.724679859609688e-169 1.4230714989143866e-75): 0
* [misc]none:  (3.493084834288097e-125 -8.87002524437924e-05 -9.534297923953677e-238): 0
* [misc]none:  (8.932193317773552e+156 -4.82948997845691e+115 -2.844669102107347e+110): 0
* [misc]none:  (6.614130481633629e+300 -6.631482835790804e+75 -2.927893218629978e+198): 0
* [misc]none:  (-5.425958198218161e-146 -5.212281525360505e+119 1.3240207557849338e+291): 0
* [misc]none:  (-6.155236203506664e+276 3.2574885636926814e-211 -9.779940061204298e+60): 0
* [misc]none:  (1.3680169753287455e-53 -1.5172504298350683e-122 2.2957389429922706e-176): 0
* [misc]none:  (1.3610327499536486e+226 4.84788597345363e+32 1.0657402022625375e+129): 0
* [misc]none:  (-6.206729553564092e+301 1.7927880379985524e+252 -8.795577755360774e-193): 0
* [misc]none:  (1.0006462262322276e+238 -9.304691570184222e+30 1.9963004369674967e-80): 0
* [misc]none:  (1.4604179220567222e+231 1.5216315041338872e-218 1.6707151526371295e-190): 0
* [misc]none:  (5.1990169359560766e-256 -6.08679419260233e+77 -2.864119470500123e-178): 0
* [misc]none:  (-4.976800097081315e-07 8.044445972631143e-28 2.635030752287841e+186): 0
* [misc]none:  (4.12100928340286e-184 9.74865050931635e+298 -7.146083996729688e+199): 0
* [misc]none:  (8.361834195928021e-55 7.311006071291519e-101 -1.2254396192804965e-192): 0
* [misc]none:  (1.782256728493473e+35 6.657191501816709e+167 -1.0237963707243293e+257): 0
* [misc]none:  (-2.376464365888854e-78 -3.222114505301457e-163 -7.76766480776823e+37): 0
* [misc]none:  (8.382633428275648e-297 -6.191205901832185e+168 2.0703305241322436e+71): 0
* [misc]none:  (6.099737398723264e-279 2.6679523035634032e-104 8.366391802268445e+167): 0
* [misc]none:  (2.870509274337958e-101 -2.318802051809187e-21 -2.362056093523898e-236): 0
* [misc]none:  (4.384610242475067e+141 1.4474621781713568e+65 -1.410046620426318e-213): 0
* [misc]none:  (-4.423020421030483e+291 -3.178469867925502e-246 -7.447731371021966e+71): 0
* [misc]none:  (5.154503491655989e+241 -1.6398756117817188e+244 -5.198066934157678e+220): 0
* [misc]none:  (5.0588074473585105e-110 3.742291531299835e+250 5.013161881068948e+307): 0
* [misc]none:  (66089027839097.664 1.4351275309127672e-234 4.416557773834991e-25): 0
* [misc]none:  (-7.605311329977112e+177 3.0442880854679596e-31 -1.3989503218776358e-06): 0
* [misc]none:  (4.664141571059094e-118 -1.8512083623442292e+194 -1.3284106669669889e+173): 0
* [misc]none:  (1.0684729481870001e-64 6.3073426358942834e+75 -2.217199084242749e+17): 1
* [misc]none:  (3.1520683467019444e-71 0.19659739803111875 7.786539791485611e+181): 0
* [misc]none:  (2.4995037253728046e-268 -26830062846468156.0 4.637177905335891e-10): 0
* [misc]none:  (-12679727921.874447 8.652041834233969e-101 -3.577245999178336e-189): 0
* [misc]none:  (3.209451012414084e+270 3.7907433031673317e-256 8.76720870691781e-247): 0
* [misc]none:  (6.160331831501279e+241 -4.568727829143705e-23 -1.757665168464323e+292): 0
* [misc]none:  (-7.388307231162813e-47 3.4124175886179475e+199 3.0044088767799776e-30): 0
* [misc]none:  (4.7140908881238785e+103 2.3604863517900675e+30 6.476730028728146e-228): 0
* [misc]none:  (-1.2222609474395545e-52 3.369115258471057e+173 1.3383461391823352e+303): 0
* [misc]none:  (-2.6712990814490822e+247 2.3157792094796435e+174 -9.842315617180003e+283): 0
* [misc]none:  (-8.795626148255621e+120 -5.857596831984434e-95 4.097601147132013e-78): 0
* [misc]none:  (4.194634882433556e+107 -1.1526493241483084e+241 3.3390334975960143e-07): 1
* [misc]none:  (-1.8082167822566404e+183 2.2475155879831534e-92 -4.169290160322216e+246): 0
* [misc]none:  (1.030614327019319e-115 -3.2696794723802255e-27 1.8172920677413648e+103): 0
* [misc]none:  (-5.3218781381905035e-129 -2.362048596457182e+298 -6.16723792553022e+40): 0
* [misc]none:  (-2.40789942954366e+44 -2.9998533512328024e-144 -1.4147186694962813e-176): 0
* [misc]none:  (1.186346974675696e+155 -1.2827160692503531e+104 6.283729883572828e+84): 0
* [misc]none:  (3.6636765762957594e-187 1.7036347403091437e+117 9.645064592867311e+67): 0
* [misc]none:  (-5.1224941914889595e+118 1.3872947227834175e-251 7.12145855246931e-10): 0
* [misc]none:  (-4.3661371414490136e+281 -1.4301261995935981e+54 2.693461062117409e-112): 0
* [misc]none:  (1.6465279540530418e+78 2.43524332605807e-278 1.0576788912710565e-08): 0
* [misc]none:  (-17241.138101224224 4.764080499693186e-90 -7.290271346747531e-14): 0
* [misc]none:  (1.3557350350348342e+244 -1.3554385625614067e+48 -1.8946459759589086e-22): 0
* [misc]none:  (1.89639974853721e+92 8.2625435987749e+74 5.2790261762422465e+19): 0
* [misc]none:  (2.0179287053921742e+58 2.884705125857619e-274 2.031068672850261e-255): 0
* [misc]none:  (2.4294527094706238e+82 7.274711555473555e+146 1.5565784464325313e+71): 0
* [misc]none:  (1.2222184804619167e+37 -5.55277905008488e-191 -2.1360290498375943e+32): 0
* [misc]none:  (4.642568065399805e-260 -4.493058001076021e-21 -2.6740094065663153e+105): 0
* [misc]none:  (3.8347842435652736e+125 -9.848724265902522e+103 7.178809205583962e-175): 1
* [misc]none:  (-3.8059392134174312e-280 -3.954815085266754e+305 1.4235559851356953e-239): 0
* [misc]none:  (4.74667737826054e-29 -1.2486100740485319e+302 -143677164285.72263): 0
* [misc]none:  (-4.897389787642899e+104 1.868517529275615e+140 -2.5024214599876482e+172): 0
* [misc]none:  (1.5276944825842992e+272 2.1335024129380783e-97 1.0953112641111952e+229): 0
* [misc]none:  (3.2587696828142436e+75 -1.5310860302360472e-220 3.7735141958833343e+170): 0
* [misc]none:  (1.0233799517176219e-267 -9.329140131915071e-38 5.348181441205713e-277): 0
* [misc]none:  (-5.024170449312866e+115 -1.611431508373217e+195 2.6631876145177815e-299): 0
* [misc]none:  (-1.3496423811442664e+228 -6.4194246582119476e+212 -6.796944270882852e-34): 0
* [misc]none:  (1.4781375733319608e-242 -2.1294463337627754e-19 3.003847336951168e+42): 0
* [misc]none:  (1.6609596531041104e-183 -6.156933300042242e+249 -2.249022094261578e+256): 0
* [misc]none:  (-4.347828572616086e-184 -2.2415468254308968e-275 5.41731325733976e-115): 0
* [misc]none:  (1.0395093493101161e-28 -6.035695609668586e-193 5.540829799846932e-307): 0
* [misc]none:  (-6.2448878184443784e-195 8.949756960721031e-195 2.722605535602291e+155): 0
* [misc]none:  (-4.714069429956778e+287 2.9453252035345084e+174 -5.843713571039491e+54): 0
* [misc]none:  (1.0160216232612932e-143 -2.425692316345541e+35 -2.0645141541195737e-123): 0
* [misc]none:  (4.178563936936926e-127 2.1657839461347663e+307 6.629963208070179e-180): 0
* [misc]none:  (-7.809772272521888e+231 -1.0023220030653375e-143 2.5453262068352747e+307): 0
* [misc]none:  (-1.1570938550413644e-156 1.7005338626981419e-143 7.808994559121766e-111): 0
* [misc]none:  (8.788013174305029e-230 -2.708463803258993e-217 2.5557776305939374e+86): 0
* [misc]none:  (-7.843719408056975e+200 -5.36699847063349e-281 -5.474411714258796e-200): 0
* [misc]none:  (3.2454192740264175e-113 4.896551008070313e-307 1.2607016124581028e+98): 0
* [misc]none:  (-2.1121060804534514e-153 -3.946147066150504e-295 6.351701463874224e-34): 0
* [misc]none:  (1.1127979592570306e-297 -1.1510973857640039e-232 -1.6396360397102689e+220): 0
* [misc]none:  (-4.631295923206326e+93 -3.257471673811612e-50 -8.226715035278119e-287): 0
* [misc]none:  (-2.255644969852512e+52 2.0134175477923286e-117 3.3910436622012204e+183): 0
* [misc]none:  (2.1370924660732585e-137 -1.9002484997441084e+30 5.027318832526334e+284): 0
* [misc]none:  (1.0214816826091913e+147 -2.018162200747419e+293 9.44950370602155e+215): 0
* [misc]none:  (1.453842915541268e+187 -2.867904353761743e+219 -2.421523337020965e+257): 0
* [misc]none:  (4.172324580820008e-133 1.6563474243613627e-33 -1.7776992082231396e+54): 0
* [misc]none:  (-1.628700320265257e-151 2.0971939106770033e-216 -1.434814592155953e+91): 0
* [misc]none:  (1.504878381563487e-123 -3.141023895275641e+245 -3.001476290410935e-269): 0
* [misc]none:  (8.06210226572923e-308 1.3704592194822044e+306 1.5354587375460247e+100): 0
* [misc]none:  (-4.31661667731193e-265 2.0724540688985427e-14 7.930730410937821e+23): 0
* [misc]none:  (1.2219765589404705e+117 -2.933277138800709e+90 4.8815870270916733e+188): 0
* [misc]none:  (-1.5358179930137542e+240 -4.258931337566508e+98 -1.144012682699149e-39): 0
* [misc]none:  (6.537529222720653e-92 -1.945641295132362e+247 -2.0251187412162225e-215): 0
* [misc]none:  (3.5709688782890513e-43 4.870593988390179e-194 5.0297272719312193e+287): 0
* [misc]none:  (-4.2293501993920744e-96 -2.936155159322882e+301 -7.874126038339784e+73): 0
* [misc]none:  (-2.0493644688447925e+84 5.027897585816787e-27 -3.868283935462521e-278): 0
* [misc]none:  (0.3310558223342685 -7.980090992758681e-50 -1.0048785011627561e-129): 0
* [misc]none:  (8.127248813391785e+226 -1.483643755550628e-284 -2.8769042098391767e+238): 0
* [misc]none:  (-1.2522521950389272e-257 7.299372666988037e-80 3.506434173585025e+201): 0
* [misc]none:  (1.1750256677114723e+302 1.7531612809893653e+136 8.844853331262414e+38): 0
* [misc]none:  (1.178943808525994e-266 9.178781884958768e+207 1.0483964125162862e-06): 0
* [misc]none:  (-3.752236763580095e-230 8.105463665693362e-194 -2.7685933486986245e+247): 0
* [misc]none:  (3.9135950474809954e+67 -2.028037433935809e-224 -3.943510659225903e+212): 0
* [misc]none:  (8.87668088957479e+21 4.513009124607983e-82 -1.952161770664997e+168): 0
* [misc]none:  (-3.2026896500136593e+106 3.9964248706286793e+300 4.3776582898304966e+81): 0
* [misc]none:  (1.5274484190953342e-17 -2.5573519175490938e+242 -7.753367484782891e-85): 0
* [misc]none:  (-1.7158977874206925e-283 -1.532955510659015e-241 3.0568938748675284e-154): 0
* [misc]none:  (2.0291756699515804e-73 8.435011553475053e-247 -8.143702901727175e-109): 0
* [misc]none:  (1.2307420681126962e+74 2.4920454965720488e-241 -1.1022915791865336e+23): 0
* [misc]none:  (-4.4511831232730076e-54 6.667510734837939e+231 -5.374019621331118e+178): 0
* [misc]none:  (8.63476246502244e-94 1.1480211985789131e-156 4.954650634110254e+246): 0
* [misc]none:  (-4.9266537053540385e-269 4.091190676322657e-21 -4.404055326509536e-182): 0
* [misc]none:  (-1.5576281112600038e-142 -3.785849338481499e+20 -3.2892975748009025e-252): 0
* [misc]none:  (-6.133557683770476e-223 -1.497130859851894e+57 3.826166416762639e+216): 0
* [misc]none:  (1.1663715170234023e-33 1.821316082219445e-31 -1.441560479175162e+51): 3
* [misc]none:  (-4.8973687170160837e+185 5.965572216773997e-266 -1.7112087034006054e+282): 0
* [misc]none:  (-8.627178870504794e+293 1.1867578517998852e-122 -1.1961490139198145e+35): 0
* [misc]none:  (4.388887965185748e-231 -3.990775770507464e-143 12041477.739790332): 0
* [misc]none:  (-1.3991744780612765e+87 -1.8538245512787994e+136 4.053980966469101e+302): 0
* [misc]none:  (2.8402608015100704e-250 -1348564663705.779 -4.759757548074155e+194): 0
* [misc]none:  (4.52129342202891e+175 -1.6048248782469113e+61 -3.969668283468194e-23): 0
* [misc]none:  (5.258242405229196e-247 -9.498386678851063e-197 -1.0709835258895982e+166): 0
* [misc]none:  (2.0947420887546095e+247 -3.0889064673505896e+234 -8.244426084214624e-140): 0
* [misc]none:  (2.1503851256841087e+121 2.5076686139270383e-164 -0.0022300046209729825): 0
* [misc]none:  (1.194061872367895e+220 1.0389358047373285e-37 -2.0087808485765453e-304): 0
* [misc]none:  (1.3687590050193055e-147 -8.234756399670311e-72 1.6542751192792692e-300): 0
* [misc]none:  (-4.773347848801604e-165 -3.5335037548803817e-216 2.602023429993787e-14): 0
* [misc]none:  (-1.4942418769123512e-302 -1.6037432475041464e-152 2.415026600632841e-155): 0
* [misc]none:  (-2.983618099380393e-19 6.08182357871597e-19 3.919727770092923e-28): 0
* [misc]none:  (-8.796417170933511e-157 2.5194286288656994e+137 -2.803376858595825e-183): 0
* [misc]none:  (1.2240297986851114e+251 3.45808714185781e+34 7.826697678487528e+235): 0
* [misc]none:  (-1.210994144233347e-198 -2.0317891841612197e-99 -6.22947928384665e-25): 0
* [misc]none:  (-4.152794278830264e-202 -2.9721370995696006e-116 3.1150480705854042e+199): 0
* [misc]none:  (-1.1101608934114058e+37 5.160642497006506e-106 2.501487961589971e-186): 0
* [misc]none:  (-1.8295893302806206e-270 3.1707458428990324e-50 1.882634228916084e+104): 0
* [misc]none:  (6.309071689177259e-279 1.6670391926080915e+97 1.5332802818158087e+215): 0
* [misc]none:  (-1.0118756898573112e+168 -2.1001979573866983e-194 -4.555748018209325e-271): 0
* [misc]none:  (1.7527084173765072e+214 -3.566410115265179e+77 -2.0754253193237223e+276): 0
* [misc]none:  (1.4185317245467992e+152 -1.3311644893547746e+182 -4.3053676243877875e-107): 0
* [misc]none:  (-2.7534409364060876e-300 -3.678907798082827e-113 6.040835984474006e+24): 0
* [misc]none:  (-3.1450504266029292e+299 -6.998469069018224e-161 -7.470113998819676e+275): 0
* [misc]none:  (-1.8796565426908664e+204 -1.099557535291122e-30 -2.3724946872194442e+266): 5
* [misc]none:  (-9.99618015977074e-100 -5.970362695291997e+22 -3.879179322621676e+202): 0
* [misc]none:  (3.321782785676469e-255 1.5087150874010425e-211 -1.7358857320695963e-267): 0
* [misc]none:  (-1.2383129644834284e+160 -1.062164837135673e+42 2.2752166795075178e+129): 1
* [misc]none:  (3.459069485774471e+125 6.125263020847728e+200 1.0472163764779166e+211): 0
* [misc]none:  (-5.593167094268887e-190 1.7800753731525426e+39 -1.9563965618862005e+178): 0
* [misc]none:  (6.863804525144902e-237 1.2654352929763856e+201 3.676700438802301e-44): 0
* [misc]none:  (-4.5884699527721836e-114 5.519538337069105e+160 -3.884002241527716e-09): 0
* [misc]none:  (3.402956999639796e+258 1.529772447679324e+286 -3.3684544179202395e+273): 0
* [misc]none:  (-7.667160800564504e+201 -1.714192033762561e-105 -3.946016692023138e+286): 0
* [misc]none:  (1.8500142756663922e+65 6.180426682633145e-231 -1.1261653603541554e-107): 0
* [misc]none:  (-2.1793389213345715e+300 1.0083640164314813e-92 6.223068053793711e+127): 0
* [misc]none:  (2.2629994924347574e-07 -3.779843999226174e+139 -3.0614286694593404e-08): 0
* [misc]none:  (-5.8394743012211145e+230 -3.7587461773373327e+104 -1.0123667364292686e-192): 0
* [misc]none:  (-9.804519419015677e-288 -6.5890526844687485e-164 -2.899016522178297e+88): 0
* [misc]none:  (3.6950126077692746e-159 -1.0679075438337597e+159 2.659181518527327e+307): 0
* [misc]none:  (4.6359994596022095e-153 -1.3879444027553083e+305 8.584176116472669): 0
* [misc]none:  (3.802591719422796e-187 -8.074991766140518e+140 1.5800617558402157e+234): 0
* [misc]none:  (1.1606607614301422e-05 3.292067705150785e-57 -1.5601971401908854e-158): 0
* [misc]none:  (3.2577820155263023e+228 -5.2844454198705195e+305 7.723034435941923e+280): 0
* [misc]none:  (-1.0201482567312647e+227 2.333964054476269e-230 2.6282948365587408e-27): 0
* [misc]none:  (-5.91489283060648e-141 -2.941458472796967e-142 2.1831432166025805e+27): 0
* [misc]none:  (1.0985453227849344e-170 -5.571663930953366e+284 -8.610351411523465e+21): 0
* [misc]none:  (2.9274193921182663e+72 3.528685173788366e+131 -3.755398726662252e-104): 0
* [misc]none:  (1.732956797107532e+257 -0.003996887291900194 -3.319613025041288e+219): 0
* [misc]none:  (-2.8353852455895346e-236 2.4977177539308356e+32 6.19863515953618e-206): 0
* [misc]none:  (-6.234997468933024e+98 -1.2483206863621665e-82 -4.3245428365292906e-97): 0
* [misc]none:  (3.1166104193766994e-137 -2.3678767156364688e+110 -3.8121763850001037e+300): 0
* [misc]none:  (9.15071959046392e+15 -5.982768696796655e-301 1.4133605543126447e+178): 0
* [misc]none:  (-5.6835404426458884e-130 -6.116012871916241e+32 -4.56282292938935e+200): 0
* [misc]none:  (4.015919715899847e+137 1.2423686537018865e-16 -2.9190823764550885e+200): 0
* [misc]none:  (-8.369149872118526e+18 -6.505453409904161e-156 -1.571835822103132e-97): 0
* [misc]none:  (-2.3015506367476294e+261 4.559321205979136e-29 8.913124246398817e-290): 0
* [misc]none:  (-1.7739145562626414e-238 -7.800592841851725e-167 -7.036042050158767e-21): 0
* [misc]none:  (220237823157837.84 -1.0913289326464034e+189 -8.082418571799865e-207): 0
* [misc]none:  (4.4061588303824944e-303 -1.003094753737015e-245 2.971068685413927e+215): 0
* [misc]none:  (-4.9172013791785835e+247 3.20782828662563e+47 -1.3139682089382477e-268): 0
* [misc]none:  (-7.0800974540359565e-196 -1.0695941285170777e+259 2.3040347636911724e-27): 0
* [misc]none:  (7.527413299194134e-199 3.222113461096366e+139 9.80786621090237e-10): 0
* [misc]none:  (-6.984190141903233e+241 -9.583105380205228e+81 -1.1006480359267765e-71): 0
* [misc]none:  (4.5779060099920917e-17 8.583739956121865e-308 -3.5994403684981127e-10): 0
* [misc]none:  (-1.9722299820001865e+94 4.460218679195514e-149 5.690021676770787e+31): 0
* [misc]none:  (5.357335632184978e-22 9.84912431615415e+293 -5.955853021225728e-91): 0
* [misc]none:  (2.236333776084836e+240 8.787526117599876e+89 6.103872924194278e-110): 0
* [misc]none:  (-8.022655362628393e+40 -4.497266801596471e+100 2.4991141371272513e-282): 4
* [misc]none:  (2.4069680102931362e+144 -2.8732816710350813e-128 0.0006145505508753878): 0
* [misc]none:  (5.770600846660463e-216 2.781426133815738e-217 2.5557241024046246e-63): 0
* [misc]none:  (4.40681776351873e+173 -4.1462345069686375e+92 5.223765227005569e-152): 0
* [misc]none:  (-1.6334098586809e+149 -7.52056490230671e+247 7.351668255412019e-155): 0
* [misc]none:  (-5.755383151195205e+172 3.666021857234008e-105 -7.362277309884386e+163): 0
* [misc]none:  (2.1884482458744437e-81 7.345575675668017e+18 -5.064289876067956e+27): 0
* [misc]none:  (8.853831150429422e+166 1.8423314112002953e-90 -2.820439640817216e+236): 0
* [misc]none:  (2.5619404272463737e+146 -5.680359460857034e-50 2.9488263936935035e+118): 0
* [misc]none:  (1.4318039063168714e-09 -5.668682219996358e+270 9.534360742444564e-26): 0
* [misc]none:  (1.2538968992553631e-96 1.2604501780655313e-299 33610193246.41273): 0
* [misc]none:  (-4.7269786251670094e+219 9.689801239106332e+272 2.3118053548193494e+30): 0
* [misc]none:  (-5.491093062090541e+163 4.652749385182812e-160 9.610215461209792e+222): 0
* [misc]none:  Picked alt (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]pick:  Picked  #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 1 1 1)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 2 1)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 1)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 2)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 1 1 1)
* [misc]approximate:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) in K
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ U J) 2) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ U J) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U J) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ U J) into (/ U J)
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ U J) 2) into (* 1/2 (/ U J))
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ U J)) 1) into (* 1/2 (/ U J))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ U J) 2) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ U J) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U J) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ U J) into (/ U J)
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ U J) 2) into (* 1/2 (/ U J))
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ U J)) 1) into (* 1/2 (/ U J))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) into (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (* 1/3 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) in J
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ U J) 2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ U J) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U J) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ U 1) into U
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) (cos (* 1/2 K))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ U J) 2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ U J) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U J) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ U 1) into U
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) (cos (* 1/2 K))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) 0) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log J)) (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))) into (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) in U
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) in U
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ U J) 2) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ U J) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U J) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 J) 2) into (/ 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 J) (cos (* 1/2 K))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ U J) 2) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ U J) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U J) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 J) 2) into (/ 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 J) (cos (* 1/2 K))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ 0 1) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 0) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) in U
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) in U
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ U J) 2) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ U J) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U J) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 J) 2) into (/ 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 J) (cos (* 1/2 K))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ U J) 2) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ U J) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U J) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 J) 2) into (/ 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 J) (cos (* 1/2 K))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ 0 1) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 0) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1) 1)))) into (/ 1/12 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/12 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/12 in J
* [misc]backup-simplify:  Simplify 1/12 into 1/12
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (* 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (* 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (cos (* 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (* 1/2 K)))) into (* 2 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/12 (pow (cos (* 1/2 K)) 2)) into (/ 1/12 (pow (cos (* 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (* 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (* 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (* 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/12 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/12 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]approximate:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)) in K
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (/ 1 J)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (/ 1 J)) into (/ J U)
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ J U) 2) into (* 1/2 (/ J U))
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J U)) (cos (/ 1/2 K))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (/ 1 J)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (/ 1 J)) into (/ J U)
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ J U) 2) into (* 1/2 (/ J U))
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J U)) (cos (/ 1/2 K))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)) in J
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (/ 1 J)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 1) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 U) (cos (/ 1/2 K))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (/ 1 J)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 1) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 U) (cos (/ 1/2 K))) into (/ 1/2 (* (cos (/ 1/2 K)) U))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ 0 1) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 1/2 (* (cos (/ 1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))) 0) into (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)) in U
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1) in U
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (/ 1 J)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (/ 1 (/ 1 J)) into J
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ J 2) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ 1/2 K))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (/ 1 J)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (/ 1 (/ 1 J)) into J
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ J 2) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ 1/2 K))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 0) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)) in U
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1) in U
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (/ 1 J)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (/ 1 (/ 1 J)) into J
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ J 2) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ 1/2 K))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (/ 1 J)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (/ 1 (/ 1 J)) into J
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ J 2) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ 1/2 K))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 0) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 2)) into (/ 1 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ 1/2 K)) 2))) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) into (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (- (* 2 (log U)))) into (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))) into (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) in K
* [misc]taylor:  Taking taylor expansion of (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ 1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ 1/2 K)) 2)) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log J)) into (* 2 (log J))
* [misc]backup-simplify:  Simplify (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) into (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (- (* 2 (log U)))) into (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))) into (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* J (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 J) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* J (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 J) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log J))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* J (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 J) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* J (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 J) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 1) into 1
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 2))) (* 1 (/ (* 1 (pow (* 2 1) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 1)))) 2) into (* 4 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (* 4 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into (* 4/3 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 4/3 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))) 1) 1)))) into (* 4/3 (/ (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (* 4/3 (/ (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 4/3 in J
* [misc]backup-simplify:  Simplify 4/3 into 4/3
* [misc]taylor:  Taking taylor expansion of (/ (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 2)) into (/ 1 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ 1/2 K)) 2))) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) into (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (- (* 2 (log U)))) into (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))) into (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) into (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (/ (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) 1) into (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) 0) (+ (* 0 0) (* 0 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) 0) (* 0 (pow (cos (/ 1/2 K)) 2))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 4/3 0) (+ (* 0 0) (* 0 (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) (* 2 (log J))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (/ 1/2 (/ 1 K))) 2))) (* 2 (log (/ 1 J)))) (* 2 (log (/ 1 U)))))) into (exp (* 1/3 (- (+ (* 2 (log (/ 1 J))) (log (/ 1/4 (pow (cos (* 1/2 K)) 2)))) (* 2 (log (/ 1 U))))))
* [misc]approximate:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)) in K
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1) in K
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (/ -1 J)) into (/ J U)
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ J U) 2) into (* 1/2 (/ J U))
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J U)) (cos (/ -1/2 K))) into (* 1/2 (/ J (* U (cos (/ -1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (/ -1 J)) into (/ J U)
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ J U) 2) into (* 1/2 (/ J U))
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J U)) (cos (/ -1/2 K))) into (* 1/2 (/ J (* U (cos (/ -1/2 K)))))
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ -1/2 K))))) (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) into (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 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/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)) in J
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]backup-simplify:  Simplify (/ (/ -1 U) -1) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 U) (cos (/ -1/2 K))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]backup-simplify:  Simplify (/ (/ -1 U) -1) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 U) (cos (/ -1/2 K))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ 0 1) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) 0) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)) in U
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1) in U
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (/ -1 (/ -1 J)) into J
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ J 2) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ -1/2 K))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (/ -1 (/ -1 J)) into J
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ J 2) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ -1/2 K))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 0) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)) in U
* [misc]taylor:  Rewrote expression to (pow (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1) in U
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (/ -1 (/ -1 J)) into J
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ J 2) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ -1/2 K))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (/ -1 (/ -1 J)) into J
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ J 2) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ -1/2 K))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 0) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 2)) into (/ 1 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ -1/2 K)) 2))) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ -1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ -1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ -1/2 K)) 2)) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log J)) into (* 2 (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ -1 J)) (+ (* J (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 J) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ -1 J)) (+ (* J (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 J) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log J))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ -1 J)) (+ (* J (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 J) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ -1 J)) (+ (* J (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 J) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 1) into 1
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 2))) (* 1 (/ (* 1 (pow (* 2 1) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 1)))) 2) into (* 4 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (* 4 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (* 4/3 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 4/3 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) 1) 1)))) into (* 4/3 (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (* 4/3 (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 4/3 in J
* [misc]backup-simplify:  Simplify 4/3 into 4/3
* [misc]taylor:  Taking taylor expansion of (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 2)) into (/ 1 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ -1/2 K)) 2))) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) 1) into (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 2) 0) (+ (* 0 0) (* 0 (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 2) 0) (* 0 (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 4/3 0) (+ (* 0 0) (* 0 (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log (/ 1 (- J)))) (log (/ 1/4 (pow (cos (/ -1/2 (/ 1 (- K)))) 2)))) (* 2 (log (/ 1 (- U))))))) into (exp (* 1/3 (- (+ (* 2 (log (/ -1 J))) (log (/ 1/4 (pow (cos (* 1/2 K)) 2)))) (* 2 (log (/ -1 U))))))
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2 2 1)
* [misc]approximate:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (* 1/3 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))) into (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) into (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (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/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) into (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (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/3)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (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/3 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) into (* 1/3 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (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/3)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 1/3) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (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/3 (log (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))) into (* 1/3 (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/3)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/3) into (pow (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))) 1/3)
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) (+ (* (/ (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]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/3 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/3 (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/3 0) (* 0 (log (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) (+ (* (/ (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]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/3 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/3 (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/3) into (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/3)
* [misc]approximate:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) into (* 1/3 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (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/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) into (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 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/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) into (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 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/3)
* [misc]taylor:  Taking taylor expansion of (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (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/3 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) into (* 1/3 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (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/3)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/3) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (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/3 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) into (* 1/3 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (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/3)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/3) into (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/3)
* [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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ 1 (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]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/3 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/3 (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/3 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/3 (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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ 1 (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]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/3 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/3 (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/3) into (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/3)
* [misc]approximate:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 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/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (log (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (log (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) into (* 1/3 (log (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 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/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (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/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (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/3)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (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/3 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) into (* 1/3 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (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/3)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/3) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ (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/3 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) into (* 1/3 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (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/3)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/3) into (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/3)
* [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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) (+ (* (/ (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]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/3 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/3 (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/3 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/3 (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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (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 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/3 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/3 (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/3) into (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/3)
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 1)
* [misc]approximate:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* J -2) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* J -2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* J -2) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* J -2) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* J -2) 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 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) (* -2 (* (cos (* 1/2 K)) J))) into (* -2 (* (cos (* 1/2 K)) (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) J)))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (* 1/2 K)) (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 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 (* (cos (* 1/2 K)) (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) 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 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) J) in J
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking 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 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (* -2 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 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 (+ (* J 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) 0) (* 0 (* -2 (* (cos (* 1/2 K)) J)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) 1) (* 0 0)) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 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/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)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))) (* 0 0)) into (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (+ (* -2 (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))))) (* 0 0)) into (- (* 2 (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 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)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 2 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))) into (* 2 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (- (* 2 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))))) into (- (* 2 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))))
* [misc]backup-simplify:  Simplify (- (* 2 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))))) into (- (* 2 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))))
* [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 (+ (* J 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) 0) (+ (* 0 0) (* 0 (* -2 (* (cos (* 1/2 K)) J))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 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 (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1)))) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))))) (* 0 0))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (- (* 2 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))))) (* 1 (* J 1))) into (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) J))
* [misc]approximate:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) (/ 1 J)) 2) (cos (/ (/ 1 K) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 1 J) -2) 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 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* -2 (/ (cos (/ 1/2 K)) J))) into (* -2 (/ (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) J))
* [misc]taylor:  Taking taylor expansion of (* -2 (/ (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 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 (/ (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) J) in J
* [misc]taylor:  Taking taylor expansion of (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) 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 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of 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)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (/ (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) 1) into (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (* -2 (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 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)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (* -2 (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (* -2 (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 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 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1 J) 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) 0) (* 0 (* -2 (/ (cos (/ 1/2 K)) J)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 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 (+ (* (cos (/ 1/2 K)) 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 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 (- (+ (* (/ 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 (+ (* (/ 1 J) 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) 0) (+ (* 0 0) (* 0 (* -2 (/ (cos (/ 1/2 K)) J))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 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 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (* (cos (/ 1/2 (/ 1 K))) (fabs (cbrt (+ (* 1/4 (/ (pow (/ 1 J) 2) (* (pow (/ 1 U) 2) (pow (cos (/ 1/2 (/ 1 K))) 2)))) 1))))) (* 1 (* (/ 1 (/ 1 J)) 1))) into (* -2 (* (cos (* 1/2 K)) (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) J)))
* [misc]approximate:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) (/ 1 (- J))) 2) (cos (/ (/ 1 (- K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -1 J) -2) 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 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1))) (* 2 (/ (cos (/ -1/2 K)) J))) into (* 2 (/ (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) J))
* [misc]taylor:  Taking taylor expansion of (* 2 (/ (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 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 (/ (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) J) in J
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) 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 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))
* [misc]taylor:  Taking 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)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))
* [misc]backup-simplify:  Simplify (/ (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) 1) into (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 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)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 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 (+ (* (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 (+ (* (/ -1 J) 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1))) 0) (* 0 (* 2 (/ (cos (/ -1/2 K)) J)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 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 (+ (* (cos (/ -1/2 K)) 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 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) 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 (+ (* (/ -1 J) 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1))) 0) (+ (* 0 0) (* 0 (* 2 (/ (cos (/ -1/2 K)) J))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 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 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (* (cos (/ -1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (* (cos (/ -1/2 (/ 1 (- K)))) (fabs (cbrt (+ (* 1/4 (/ (pow (/ 1 (- J)) 2) (* (pow (cos (/ -1/2 (/ 1 (- K)))) 2) (pow (/ 1 (- U)) 2)))) 1))))) (* 1 (* (/ 1 (/ 1 (- J))) 1))) into (* -2 (* (cos (* 1/2 K)) (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) J)))
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (* 1/3 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/3)) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/6)
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) into (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))))) into (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) 1/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) 1/3)) into (pow (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1) 1/6)
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) into (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (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/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/3)) into (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/6)
* [misc]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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)) into (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) into (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (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/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/3)) into (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/6)
* [misc]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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1/6) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/6 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/6 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))) in J
* [misc]taylor:  Taking taylor expansion of 1/6 in J
* [misc]backup-simplify:  Simplify 1/6 into 1/6
* [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/6 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) into (* 1/6 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/6 (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/6)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1) 1/6) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/6 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/6 (log (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of 1/6 in K
* [misc]backup-simplify:  Simplify 1/6 into 1/6
* [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/6 (log (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))) into (* 1/6 (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/6 (log (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/6)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/6) into (pow (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))) 1/6)
* [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/6 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/6 (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/6 0) (* 0 (log (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/6 (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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (+ (log U) (log (/ 1/2 (* (cos (* 1/2 K)) J)))))) 1)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 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/6))) 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/6 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/6 (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/6) into (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/6)
* [misc]approximate:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/6)
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)) into (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1))) into (* 1/3 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (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/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) 1/3)) into (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) 1/6)
* [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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (/ 1/2 K)) U))) (log J)))) 1) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) into (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 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/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/3)) into (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/6)
* [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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))) into (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) into (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 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/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/3)) into (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/6)
* [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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/6) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/6 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/6 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))) in J
* [misc]taylor:  Taking taylor expansion of 1/6 in J
* [misc]backup-simplify:  Simplify 1/6 into 1/6
* [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/6 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) into (* 1/6 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/6 (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/6)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/6) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/6 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/6 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of 1/6 in K
* [misc]backup-simplify:  Simplify 1/6 into 1/6
* [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/6 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1))) into (* 1/6 (log (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/6 (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/6)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/6) into (pow (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 1) 1/6)
* [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/6 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/6 (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/6 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/6 (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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ 1 (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 (pow 0 2) (+)) (* 2 (pow (+ 1 (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) 1/6))) 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/6 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/6 (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/6) into (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/6)
* [misc]approximate:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 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/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/3)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/6)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (log (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))) into (log (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))))) into (* 1/3 (log (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 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/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) 1/3)) into (pow (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) 1/6)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (/ -1/2 K)) U))) (log J))))) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (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/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/3)) into (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/6)
* [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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) into (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (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/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/3)) into (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/6)
* [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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1/6) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/6 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/6 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of 1/6 in J
* [misc]backup-simplify:  Simplify 1/6 into 1/6
* [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/6 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) into (* 1/6 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/6 (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/6)
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/6) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/6 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/6 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) in K
* [misc]taylor:  Taking taylor expansion of 1/6 in K
* [misc]backup-simplify:  Simplify 1/6 into 1/6
* [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/6 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1))) into (* 1/6 (log (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/6 (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/6)
* [misc]backup-simplify:  Simplify (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/6) into (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ -1/2 K)))) (log J)) (log U)))) 1) 1/6)
* [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/6 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/6 (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/6 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/6 (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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 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/6))) 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/6 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/6 (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/6) into (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/6)
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (pow (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) 1/3)) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 2 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (pow (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) 1)) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 3 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (exp (log (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (log (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (50 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (447 enodes)
* [exit]simplify:  Simplified to (log (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 4 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (log (exp (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (exp (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (50 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (447 enodes)
* [exit]simplify:  Simplified to (exp (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 5 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (* (cbrt (* (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt (* (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (51 enodes)
* * [misc]simplify:  iters left: 3 (161 enodes)
* * [misc]simplify:  iters left: 2 (446 enodes)
* [exit]simplify:  Simplified to (cbrt (* (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)) (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (* (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)) (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (50 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (447 enodes)
* [exit]simplify:  Simplified to (cbrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 6 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (* (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))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (50 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (447 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (50 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (447 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 7 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (* (cbrt 1) (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (cbrt 1)
* [exit]simplify:  Simplified to (cbrt 1)
* [enter]simplify:  Simplifying (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (49 enodes)
* * [misc]simplify:  iters left: 3 (158 enodes)
* * [misc]simplify:  iters left: 2 (442 enodes)
* [exit]simplify:  Simplified to (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* [exit]simplify:  Simplified to (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 8 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (/ (cbrt (+ (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3) (pow 1 3))) (cbrt (+ (* (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))) (- (* 1 1) (* (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt (+ (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3) (pow 1 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (91 enodes)
* * [misc]simplify:  iters left: 3 (410 enodes)
* [exit]simplify:  Simplified to (cbrt (+ 1 (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3))))
* [exit]simplify:  Simplified to (cbrt (+ 1 (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3))))
* [enter]simplify:  Simplifying (cbrt (+ (* (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))) (- (* 1 1) (* (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (141 enodes)
* [exit]simplify:  Simplified to (cbrt (- 1 (- (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (cbrt (- 1 (- (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) (+ 3 1)))))
* * * * [misc]progress:  [ 9 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (/ (cbrt (- (* (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))) (* 1 1))) (cbrt (- (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt (- (* (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))) (* 1 1)))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (90 enodes)
* * [misc]simplify:  iters left: 3 (383 enodes)
* [exit]simplify:  Simplified to (cbrt (- (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)) 1))
* [exit]simplify:  Simplified to (cbrt (- (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)) 1))
* [enter]simplify:  Simplifying (cbrt (- (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (28 enodes)
* * [misc]simplify:  iters left: 4 (57 enodes)
* * [misc]simplify:  iters left: 3 (183 enodes)
* [exit]simplify:  Simplified to (cbrt (- (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))
* [exit]simplify:  Simplified to (cbrt (- (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 10 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (* (* (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (51 enodes)
* * [misc]simplify:  iters left: 3 (161 enodes)
* * [misc]simplify:  iters left: 2 (446 enodes)
* [exit]simplify:  Simplified to (* (cbrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (cbrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (cbrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (cbrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (50 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (447 enodes)
* [exit]simplify:  Simplified to (cbrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 11 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (* (* (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (54 enodes)
* * [misc]simplify:  iters left: 3 (165 enodes)
* * [misc]simplify:  iters left: 2 (446 enodes)
* [exit]simplify:  Simplified to (+ (* (/ (/ 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)))) 1)
* * * * [misc]progress:  [ 12 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (* (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (50 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (447 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [enter]simplify:  Simplifying (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (50 enodes)
* * [misc]simplify:  iters left: 3 (159 enodes)
* * [misc]simplify:  iters left: 2 (447 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 13 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (* 1 (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 14 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3))))>
* * * * [misc]progress:  [ 15 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (pow (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1))))>
* * * * [misc]progress:  [ 16 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (exp (log (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (log (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 (log (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 17 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (log (exp (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 18 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (* (cbrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (cbrt (* (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (* (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)) (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 19 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (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)))
* [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 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (* (cbrt 1) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (cbrt 1)
* [exit]simplify:  Simplified to (cbrt 1)
* [enter]simplify:  Simplifying (cbrt (+ 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 (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* [exit]simplify:  Simplified to (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 21 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (/ (cbrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (cbrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (cbrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (202 enodes)
* [exit]simplify:  Simplified to (cbrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [exit]simplify:  Simplified to (cbrt (+ 1 (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3)))
* [enter]simplify:  Simplifying (cbrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (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 (cbrt (+ (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 (cbrt (+ (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 22 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (/ (cbrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (187 enodes)
* [exit]simplify:  Simplified to (cbrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (cbrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))
* [enter]simplify:  Simplifying (cbrt (- 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 (cbrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (cbrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 23 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (* (* (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (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 (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 24 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (* (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (107 enodes)
* * [misc]simplify:  iters left: 2 (332 enodes)
* [exit]simplify:  Simplified to (+ (* (/ (/ (/ 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)))) 1)
* * * * [misc]progress:  [ 25 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (* (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [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)))
* [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:  [ 26 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (* 1 (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 27 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (pow (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) 1) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (80 enodes)
* * [misc]simplify:  iters left: 3 (213 enodes)
* * [misc]simplify:  iters left: 2 (485 enodes)
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J)))
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J)))
* * * * [misc]progress:  [ 28 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (pow (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) 1) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (80 enodes)
* * [misc]simplify:  iters left: 3 (213 enodes)
* * [misc]simplify:  iters left: 2 (485 enodes)
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J)))
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J)))
* * * * [misc]progress:  [ 29 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (pow (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) 1) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 30 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (exp (+ (log (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (+ (log (* J -2)) (log (cos (/ K 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (+ (log (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (+ (log (* J -2)) (log (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (78 enodes)
* * [misc]simplify:  iters left: 3 (209 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (cos (/ K 2))) (log (* J -2))) (log (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (+ (+ (log (cos (/ K 2))) (log (* J -2))) (log (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 31 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (exp (+ (log (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (log (* (* J -2) (cos (/ K 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (+ (log (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (log (* (* J -2) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (79 enodes)
* * [misc]simplify:  iters left: 3 (215 enodes)
* [exit]simplify:  Simplified to (+ (log (* (cos (/ K 2)) (* J -2))) (log (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (+ (log (* (cos (/ K 2)) (* J -2))) (log (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 32 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (exp (log (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (log (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (92 enodes)
* * [misc]simplify:  iters left: 3 (253 enodes)
* [exit]simplify:  Simplified to (log (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))))
* [exit]simplify:  Simplified to (log (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 33 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (log (exp (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (exp (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (83 enodes)
* * [misc]simplify:  iters left: 3 (215 enodes)
* [exit]simplify:  Simplified to (exp (* (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))))
* [exit]simplify:  Simplified to (exp (* (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 34 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (cbrt (* (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (24 enodes)
* * [misc]simplify:  iters left: 5 (55 enodes)
* * [misc]simplify:  iters left: 4 (175 enodes)
* [exit]simplify:  Simplified to (* (* (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))) (* (* (* (cos (/ K 2)) (pow (* -2 J) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (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))) (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))) (* (* (* (cos (/ K 2)) (pow (* -2 J) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 35 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (cbrt (* (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (cos (/ K 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (50 enodes)
* * [misc]simplify:  iters left: 4 (149 enodes)
* [exit]simplify:  Simplified to (* (* (pow (* (* -2 J) (cos (/ K 2))) 3) (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (* (pow (* (* -2 J) (cos (/ K 2))) 3) (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 36 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))) (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))))) (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))) (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (82 enodes)
* * [misc]simplify:  iters left: 3 (217 enodes)
* * [misc]simplify:  iters left: 2 (494 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J)))))
* [exit]simplify:  Simplified to (* (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J)))))
* [enter]simplify:  Simplifying (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 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 (215 enodes)
* [exit]simplify:  Simplified to (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))))
* [exit]simplify:  Simplified to (cbrt (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 37 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (cbrt (* (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))) (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))) (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (45 enodes)
* * [misc]simplify:  iters left: 4 (130 enodes)
* [exit]simplify:  Simplified to (pow (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))) 3)
* [exit]simplify:  Simplified to (pow (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))) 3)
* * * * [misc]progress:  [ 38 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (sqrt (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))) (sqrt (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 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 (215 enodes)
* [exit]simplify:  Simplified to (sqrt (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))))
* [exit]simplify:  Simplified to (sqrt (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (sqrt (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 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 (215 enodes)
* [exit]simplify:  Simplified to (sqrt (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))))
* [exit]simplify:  Simplified to (sqrt (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 39 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* 1 (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 40 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* J -2)) (cos (/ K 2))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* J -2))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (63 enodes)
* * [misc]simplify:  iters left: 3 (173 enodes)
* * [misc]simplify:  iters left: 2 (460 enodes)
* [exit]simplify:  Simplified to (* (* -2 J) (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (* -2 J) (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 41 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))) (* (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (* J -2) (cos (/ K 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (* J -2) (cos (/ K 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 (216 enodes)
* [exit]simplify:  Simplified to (* (cbrt (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* (cos (/ K 2)) (* J -2)))
* [exit]simplify:  Simplified to (* (cbrt (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* (cos (/ K 2)) (* J -2)))
* * * * [misc]progress:  [ 42 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (sqrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (sqrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (* J -2) (cos (/ K 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (sqrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (* J -2) (cos (/ K 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 (216 enodes)
* [exit]simplify:  Simplified to (* (sqrt (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* (cos (/ K 2)) (* J -2)))
* [exit]simplify:  Simplified to (* (sqrt (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* (cos (/ K 2)) (* J -2)))
* * * * [misc]progress:  [ 43 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* 1 (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (80 enodes)
* * [misc]simplify:  iters left: 3 (213 enodes)
* * [misc]simplify:  iters left: 2 (485 enodes)
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J)))
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J)))
* * * * [misc]progress:  [ 44 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 45 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (pow (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/2)))>
* * * * [misc]progress:  [ 46 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (pow (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1)))>
* * * * [misc]progress:  [ 47 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (exp (log (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (log (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 (log (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 48 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (log (exp (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (exp (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 49 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (* (* (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]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 (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (sqrt (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (sqrt (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 50 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (cbrt (* (* (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (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 (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (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))) (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 51 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (* (sqrt (cbrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (* (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (sqrt (cbrt (* (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (sqrt (cbrt (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 (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 52 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (* (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (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))))
* [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:  [ 53 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (* (sqrt (cbrt 1)) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt 1))
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt 1))
* [exit]simplify:  Simplified to (sqrt (cbrt 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:  [ 54 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (* (sqrt (* (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (fabs (cbrt (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (cbrt (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 (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (cbrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 55 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (* (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (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))))
* [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:  [ 56 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (* (sqrt 1) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 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:  [ 57 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (/ (sqrt (cbrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (sqrt (cbrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (206 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [exit]simplify:  Simplified to (sqrt (cbrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [enter]simplify:  Simplifying (sqrt (cbrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (35 enodes)
* * [misc]simplify:  iters left: 4 (91 enodes)
* * [misc]simplify:  iters left: 3 (340 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (- (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 (cbrt (- (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)) (- (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 58 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (/ (sqrt (cbrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (194 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (sqrt (cbrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 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 (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 (cbrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (cbrt (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 59 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (* (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (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))))
* [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:  [ 60 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (fabs (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 61 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (fabs (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 62 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (* 1 (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 63 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (fabs 1) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (fabs 1) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (90 enodes)
* * [misc]simplify:  iters left: 3 (228 enodes)
* [exit]simplify:  Simplified to (* (* (* (fabs 1) (* J -2)) (cos (/ K 2))) (sqrt (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 64 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (fabs (exp (* 1/3 (- (+ (* 2 (log (/ 1 J))) (log (/ 1/4 (pow (cos (* 1/2 K)) 2)))) (* 2 (log (/ 1 U))))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (fabs (exp (* 1/3 (- (+ (* 2 (log (/ 1 J))) (log (/ 1/4 (pow (cos (* 1/2 K)) 2)))) (* 2 (log (/ 1 U))))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (38 enodes)
* * [misc]simplify:  iters left: 5 (80 enodes)
* * [misc]simplify:  iters left: 4 (179 enodes)
* * [misc]simplify:  iters left: 3 (473 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) -2)) (* J (fabs (pow (exp 1/3) (- (- (+ (* 2 (log U)) (log 1/4)) (log (cos (* 1/2 K)))) (+ (log (cos (* 1/2 K))) (* (log J) 2)))))))
* * * * [misc]progress:  [ 65 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (fabs (exp (* 1/3 (- (+ (* 2 (log (/ -1 J))) (log (/ 1/4 (pow (cos (* 1/2 K)) 2)))) (* 2 (log (/ -1 U))))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (fabs (exp (* 1/3 (- (+ (* 2 (log (/ -1 J))) (log (/ 1/4 (pow (cos (* 1/2 K)) 2)))) (* 2 (log (/ -1 U))))))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (39 enodes)
* * [misc]simplify:  iters left: 5 (79 enodes)
* * [misc]simplify:  iters left: 4 (172 enodes)
* * [misc]simplify:  iters left: 3 (439 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (cbrt (+ 1 (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2))))))) (* (* -2 J) (cos (/ K 2)))) (fabs (pow (exp 1/3) (+ (* (- (log (/ -1 J)) (log (/ -1 U))) 2) (log (/ 1/4 (* (cos (* 1/2 K)) (cos (* 1/2 K)))))))))
* * * * [misc]progress:  [ 66 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/3))))>
* [enter]simplify:  Simplifying (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/3)))
* * [misc]simplify:  iters left: 6 (31 enodes)
* * [misc]simplify:  iters left: 5 (62 enodes)
* * [misc]simplify:  iters left: 4 (143 enodes)
* * [misc]simplify:  iters left: 3 (387 enodes)
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (* (cos (/ K 2)) (* -2 J)) (sqrt (cbrt (+ 1 (* (/ (* U 1/2) J) (/ (* U 1/2) J)))))))
* * * * [misc]progress:  [ 67 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/3))))>
* [enter]simplify:  Simplifying (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/3)))
* * [misc]simplify:  iters left: 6 (36 enodes)
* * [misc]simplify:  iters left: 5 (78 enodes)
* * [misc]simplify:  iters left: 4 (181 enodes)
* [exit]simplify:  Simplified to (* (* (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))) (sqrt (cbrt (+ 1 (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U))))))))
* * * * [misc]progress:  [ 68 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/3))))>
* [enter]simplify:  Simplifying (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/3)))
* * [misc]simplify:  iters left: 6 (37 enodes)
* * [misc]simplify:  iters left: 5 (77 enodes)
* * [misc]simplify:  iters left: 4 (180 enodes)
* [exit]simplify:  Simplified to (* (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))) (sqrt (cbrt (+ 1 (pow (exp 2) (- (log (/ 1/2 (cos (* 1/2 K)))) (- (log (/ -1 U)) (log (/ -1 J)))))))))
* * * * [misc]progress:  [ 69 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) J)) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) J)) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (31 enodes)
* * [misc]simplify:  iters left: 5 (59 enodes)
* * [misc]simplify:  iters left: 4 (134 enodes)
* * [misc]simplify:  iters left: 3 (388 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (fabs (cbrt (+ (/ (* (* 1/4 (/ U J)) (/ U J)) (* (cos (* K 1/2)) (cos (* K 1/2)))) 1)))) (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 70 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 (* (cos (* 1/2 K)) (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) J))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* -2 (* (cos (* 1/2 K)) (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) J))) (sqrt (cbrt (+ 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 (154 enodes)
* * [misc]simplify:  iters left: 3 (461 enodes)
* [exit]simplify:  Simplified to (* (* -2 (fabs (cbrt (+ (* (/ 1/4 (cos (* K 1/2))) (/ (* (/ U J) (/ U J)) (cos (* K 1/2)))) 1)))) (* (* J (cos (* K 1/2))) (sqrt (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 71 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 (* (cos (* 1/2 K)) (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) J))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* -2 (* (cos (* 1/2 K)) (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow J 2) (pow (cos (* 1/2 K)) 2)))) 1))) J))) (sqrt (cbrt (+ 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 (154 enodes)
* * [misc]simplify:  iters left: 3 (461 enodes)
* [exit]simplify:  Simplified to (* (* -2 (fabs (cbrt (+ (* (/ 1/4 (cos (* K 1/2))) (/ (* (/ U J) (/ U J)) (cos (* K 1/2)))) 1)))) (* (* J (cos (* K 1/2))) (sqrt (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 72 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/6)))>
* [enter]simplify:  Simplifying (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (pow (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1) 1/6))
* * [misc]simplify:  iters left: 6 (30 enodes)
* * [misc]simplify:  iters left: 5 (60 enodes)
* * [misc]simplify:  iters left: 4 (141 enodes)
* * [misc]simplify:  iters left: 3 (385 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* (pow (+ 1 (* (* (/ 1/2 J) U) (* (/ 1/2 J) U))) 1/6) (* -2 J))) (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 73 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/6)))>
* [enter]simplify:  Simplifying (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (pow (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))) 1/6))
* * [misc]simplify:  iters left: 6 (35 enodes)
* * [misc]simplify:  iters left: 5 (76 enodes)
* * [misc]simplify:  iters left: 4 (179 enodes)
* [exit]simplify:  Simplified to (* (* (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))) (pow (+ 1 (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U))))) 1/6))
* * * * [misc]progress:  [ 74 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/6)))>
* [enter]simplify:  Simplifying (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (pow (+ 1 (exp (* 2 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))) 1/6))
* * [misc]simplify:  iters left: 6 (36 enodes)
* * [misc]simplify:  iters left: 5 (75 enodes)
* * [misc]simplify:  iters left: 4 (178 enodes)
* [exit]simplify:  Simplified to (* (* (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* -2 J))) (pow (+ 1 (pow (exp 2) (+ (- (log (/ -1 J)) (log (/ -1 U))) (log (/ 1/2 (cos (* 1/2 K))))))) 1/6))
* * * [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: 6
* [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:  Non-fresh alt: (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* [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) (* (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 indices
* [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) (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))))): 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:  Best fresh alt per point
* [misc]none:  (9.568527921939742e-273 2.654414227492494e+20 1.7090726067739176e-227): 2
* [misc]none:  (7.696162327562603e-152 -1.7235772956324157e+44 -1.849105607217708e-205): 0
* [misc]none:  (5.106850318067203e-223 -8.776422694060002e-191 -1.0339801069916732e-122): 0
* [misc]none:  (1.3381086996667414e-215 -1.2294460237484715e+92 -9.903617261398821e+48): 0
* [misc]none:  (1.0224180420716733e-52 -5.2868600650398754e+73 9.705038014433044e-175): 0
* [misc]none:  (-2.2377664482363495e-145 -6.863248801263982e-282 6.028770352690154e-151): 2
* [misc]none:  (-425.15997261130053 -1.4215485644178288e+122 6.224141164637054e+75): 0
* [misc]none:  (-1.2086624476009651e-200 2.3623052767393814e+153 4.4633600804799425e+142): 0
* [misc]none:  (-1.6813749551547664e-222 -4.6390246315423324e+36 1.2790861077923577e+68): 0
* [misc]none:  (1.0592112097552954e+143 -7.191398511280425e-59 -2.3255237224962407e-56): 0
* [misc]none:  (1.6780592368033288e-262 1.5331200777386884e+269 2.973444851318118e-169): 0
* [misc]none:  (1.6828576275377584e-98 4.5525663232975395e+86 4.922686678959719e-213): 0
* [misc]none:  (9.601043864442096e+176 5.752669291865014e-257 3.0310347416413137e-258): 0
* [misc]none:  (-1.1043473204259838e-123 -2.06284826271339e+143 -7.24722487096989e+250): 0
* [misc]none:  (-2.2793842908096357e+72 -8.124520965103743e+145 3.727663855470157e+254): 0
* [misc]none:  (8.775974517752829e+204 -644684.1881687096 -5.072621494700167e+267): 2
* [misc]none:  (-4.473451124127099e-235 1.5758037123807388e+87 -3.1154131766396667e+29): 0
* [misc]none:  (2.4492953260422185e+131 5.835395598392501e+198 -1.2951522948212234e+105): 0
* [misc]none:  (2.2545095115116114e+189 -1.4107789582096962e+111 -4.521345173807944e-274): 0
* [misc]none:  (2.4757193927168845e-307 -3.9546390943242443e-82 1.457018723838865e-35): 0
* [misc]none:  (-1.5246504675906286e-147 -1.1042460154015769e-187 -3.30379604621756e-180): 2
* [misc]none:  (-8.185062082112633e+221 9.424239481611678e-294 1.5096638452158614e-71): 0
* [misc]none:  (-1.830572871972773e-27 -1.714392276509888e-289 -9.870003932393336e-46): 1
* [misc]none:  (-2.2727962542731896e+253 6.967234360883543e-112 2.0770495361468835e+203): 0
* [misc]none:  (-3.5348879909542174e+259 3.1401318723071353e-131 -1.4852188300484065e-239): 2
* [misc]none:  (-3.374264737975756e+72 -1.0890756353988414e+102 0.228970627026966): 1
* [misc]none:  (8.40469635347052e+100 2.1321881547753267e-44 1.7739584018359304e-207): 1
* [misc]none:  (-2.723194185823719e-255 6.866799226360426e-109 6.417434319517234e+231): 0
* [misc]none:  (-1.105123941463264e-44 -1.5442050061781137e-296 -2.5125878605191734e-29): 1
* [misc]none:  (4.508352673437809e+248 -1.4801509312754967e-61 -5.163900824605852e+32): 0
* [misc]none:  (1.430295312965348e-149 3.112001531242655e+80 3.0475240801607222e-148): 0
* [misc]none:  (-5.232709143225968e-98 -2.6904647286120434e+306 -2.4014893155423993e+35): 0
* [misc]none:  (1.4966275592591335e-123 6.384545099874781e-168 -1.9863653303691194e-296): 0
* [misc]none:  (-1.5110806788081036e+47 4.232269734875141e-205 4.1020469956028986e+24): 1
* [misc]none:  (2.1703230086091624e+277 -4.725142043601307e-47 2.68866513359689e-174): 0
* [misc]none:  (8.96636707501737e-13 -2.3580830331388543e-23 1.6082525618587168e-259): 1
* [misc]none:  (2.7230496615379425e-188 7.15832835948139e-179 -3.386296042382532e-190): 0
* [misc]none:  (2.991170371343952e+151 -7.407998779781806e-33 -7.014935371531484e-98): 0
* [misc]none:  (-2.580522918977788e+184 8.990843056511833e-32 3.9088008390110404e+59): 2
* [misc]none:  (6.754325943853309e-283 -1.0323836290065946e-292 -1.1379474227414984e+157): 0
* [misc]none:  (-4.747329706134133e-300 -2.266131068741548e-232 6.354961149716869e-97): 0
* [misc]none:  (2.8293820765322485e-296 5.3887495676776976e+171 -503507.16469484643): 0
* [misc]none:  (-1.9250288775511552e-19 9.871143682146977e-239 -1.9809585244792104e-221): 1
* [misc]none:  (-5.324127388080003e+141 5.123849747663666e+133 4.007761912625816e-148): 0
* [misc]none:  (3.321054281872602e+251 -7.33347091133757e-103 -3.967500572333352e+95): 0
* [misc]none:  (-8.002576117532625e+293 -344.7442723289036 8.452539306620761e+219): 0
* [misc]none:  (-3.8897511496224356e+161 4.4485313287564445e+252 -2.9971297913067123e-296): 0
* [misc]none:  (1.120554825473697e-298 7.175557259725409e-49 4.4800031186106794e-70): 0
* [misc]none:  (-1.3609788364339258e+82 2.5265807746711182e-73 1.4440898226736705e-53): 1
* [misc]none:  (-4.651815532356965e+285 -1.223165056942955e+279 2.3912903471184356e-134): 2
* [misc]none:  (3.53511184703484e+158 -2.8955398952451435e+131 1.5780761566396397e+125): 2
* [misc]none:  (1.534059348183312e-189 2.8419420301747055e+90 -2.318158899615234e+28): 0
* [misc]none:  (8.976998414840432e+184 3.9122094377392414e+59 -6.588522440277298e+124): 2
* [misc]none:  (-8.890171102288788e+241 -4.517606044160453e-29 -2.0229301807644786e+90): 2
* [misc]none:  (4.588817619865515e-83 6.908716276621429e+42 1.074034252081928e-96): 1
* [misc]none:  (-2.0525626505030474e-205 1.43328810513268e+174 -3.517237475307537e+70): 0
* [misc]none:  (1.6570172448601563e-137 2.4048926517811354e+66 -1.2386076426807104e+281): 0
* [misc]none:  (4.0623211606609595e-228 1.5982222044177176e+181 8.398043771606399e+47): 0
* [misc]none:  (-6.552213310391902e+218 -2.461870212435176e+181 -9.04145577094214e-51): 0
* [misc]none:  (6.730955893129463e-197 6.724679859609688e-169 1.4230714989143866e-75): 0
* [misc]none:  (3.493084834288097e-125 -8.87002524437924e-05 -9.534297923953677e-238): 0
* [misc]none:  (8.932193317773552e+156 -4.82948997845691e+115 -2.844669102107347e+110): 2
* [misc]none:  (6.614130481633629e+300 -6.631482835790804e+75 -2.927893218629978e+198): 0
* [misc]none:  (-5.425958198218161e-146 -5.212281525360505e+119 1.3240207557849338e+291): 0
* [misc]none:  (-6.155236203506664e+276 3.2574885636926814e-211 -9.779940061204298e+60): 2
* [misc]none:  (1.3680169753287455e-53 -1.5172504298350683e-122 2.2957389429922706e-176): 0
* [misc]none:  (1.3610327499536486e+226 4.84788597345363e+32 1.0657402022625375e+129): 2
* [misc]none:  (-6.206729553564092e+301 1.7927880379985524e+252 -8.795577755360774e-193): 2
* [misc]none:  (1.0006462262322276e+238 -9.304691570184222e+30 1.9963004369674967e-80): 0
* [misc]none:  (1.4604179220567222e+231 1.5216315041338872e-218 1.6707151526371295e-190): 0
* [misc]none:  (5.1990169359560766e-256 -6.08679419260233e+77 -2.864119470500123e-178): 0
* [misc]none:  (-4.976800097081315e-07 8.044445972631143e-28 2.635030752287841e+186): 0
* [misc]none:  (4.12100928340286e-184 9.74865050931635e+298 -7.146083996729688e+199): 0
* [misc]none:  (8.361834195928021e-55 7.311006071291519e-101 -1.2254396192804965e-192): 1
* [misc]none:  (1.782256728493473e+35 6.657191501816709e+167 -1.0237963707243293e+257): 0
* [misc]none:  (-2.376464365888854e-78 -3.222114505301457e-163 -7.76766480776823e+37): 1
* [misc]none:  (8.382633428275648e-297 -6.191205901832185e+168 2.0703305241322436e+71): 0
* [misc]none:  (6.099737398723264e-279 2.6679523035634032e-104 8.366391802268445e+167): 0
* [misc]none:  (2.870509274337958e-101 -2.318802051809187e-21 -2.362056093523898e-236): 1
* [misc]none:  (4.384610242475067e+141 1.4474621781713568e+65 -1.410046620426318e-213): 0
* [misc]none:  (-4.423020421030483e+291 -3.178469867925502e-246 -7.447731371021966e+71): 2
* [misc]none:  (5.154503491655989e+241 -1.6398756117817188e+244 -5.198066934157678e+220): 2
* [misc]none:  (5.0588074473585105e-110 3.742291531299835e+250 5.013161881068948e+307): 0
* [misc]none:  (66089027839097.664 1.4351275309127672e-234 4.416557773834991e-25): 1
* [misc]none:  (-7.605311329977112e+177 3.0442880854679596e-31 -1.3989503218776358e-06): 2
* [misc]none:  (4.664141571059094e-118 -1.8512083623442292e+194 -1.3284106669669889e+173): 0
* [misc]none:  (1.0684729481870001e-64 6.3073426358942834e+75 -2.217199084242749e+17): 0
* [misc]none:  (3.1520683467019444e-71 0.19659739803111875 7.786539791485611e+181): 0
* [misc]none:  (2.4995037253728046e-268 -26830062846468156.0 4.637177905335891e-10): 0
* [misc]none:  (-12679727921.874447 8.652041834233969e-101 -3.577245999178336e-189): 1
* [misc]none:  (3.209451012414084e+270 3.7907433031673317e-256 8.76720870691781e-247): 0
* [misc]none:  (6.160331831501279e+241 -4.568727829143705e-23 -1.757665168464323e+292): 0
* [misc]none:  (-7.388307231162813e-47 3.4124175886179475e+199 3.0044088767799776e-30): 1
* [misc]none:  (4.7140908881238785e+103 2.3604863517900675e+30 6.476730028728146e-228): 2
* [misc]none:  (-1.2222609474395545e-52 3.369115258471057e+173 1.3383461391823352e+303): 0
* [misc]none:  (-2.6712990814490822e+247 2.3157792094796435e+174 -9.842315617180003e+283): 0
* [misc]none:  (-8.795626148255621e+120 -5.857596831984434e-95 4.097601147132013e-78): 2
* [misc]none:  (4.194634882433556e+107 -1.1526493241483084e+241 3.3390334975960143e-07): 0
* [misc]none:  (-1.8082167822566404e+183 2.2475155879831534e-92 -4.169290160322216e+246): 0
* [misc]none:  (1.030614327019319e-115 -3.2696794723802255e-27 1.8172920677413648e+103): 0
* [misc]none:  (-5.3218781381905035e-129 -2.362048596457182e+298 -6.16723792553022e+40): 0
* [misc]none:  (-2.40789942954366e+44 -2.9998533512328024e-144 -1.4147186694962813e-176): 0
* [misc]none:  (1.186346974675696e+155 -1.2827160692503531e+104 6.283729883572828e+84): 0
* [misc]none:  (3.6636765762957594e-187 1.7036347403091437e+117 9.645064592867311e+67): 0
* [misc]none:  (-5.1224941914889595e+118 1.3872947227834175e-251 7.12145855246931e-10): 0
* [misc]none:  (-4.3661371414490136e+281 -1.4301261995935981e+54 2.693461062117409e-112): 0
* [misc]none:  (1.6465279540530418e+78 2.43524332605807e-278 1.0576788912710565e-08): 1
* [misc]none:  (-17241.138101224224 4.764080499693186e-90 -7.290271346747531e-14): 1
* [misc]none:  (1.3557350350348342e+244 -1.3554385625614067e+48 -1.8946459759589086e-22): 0
* [misc]none:  (1.89639974853721e+92 8.2625435987749e+74 5.2790261762422465e+19): 0
* [misc]none:  (2.0179287053921742e+58 2.884705125857619e-274 2.031068672850261e-255): 1
* [misc]none:  (2.4294527094706238e+82 7.274711555473555e+146 1.5565784464325313e+71): 1
* [misc]none:  (1.2222184804619167e+37 -5.55277905008488e-191 -2.1360290498375943e+32): 1
* [misc]none:  (4.642568065399805e-260 -4.493058001076021e-21 -2.6740094065663153e+105): 0
* [misc]none:  (3.8347842435652736e+125 -9.848724265902522e+103 7.178809205583962e-175): 0
* [misc]none:  (-3.8059392134174312e-280 -3.954815085266754e+305 1.4235559851356953e-239): 0
* [misc]none:  (4.74667737826054e-29 -1.2486100740485319e+302 -143677164285.72263): 2
* [misc]none:  (-4.897389787642899e+104 1.868517529275615e+140 -2.5024214599876482e+172): 2
* [misc]none:  (1.5276944825842992e+272 2.1335024129380783e-97 1.0953112641111952e+229): 0
* [misc]none:  (3.2587696828142436e+75 -1.5310860302360472e-220 3.7735141958833343e+170): 0
* [misc]none:  (1.0233799517176219e-267 -9.329140131915071e-38 5.348181441205713e-277): 0
* [misc]none:  (-5.024170449312866e+115 -1.611431508373217e+195 2.6631876145177815e-299): 0
* [misc]none:  (-1.3496423811442664e+228 -6.4194246582119476e+212 -6.796944270882852e-34): 0
* [misc]none:  (1.4781375733319608e-242 -2.1294463337627754e-19 3.003847336951168e+42): 0
* [misc]none:  (1.6609596531041104e-183 -6.156933300042242e+249 -2.249022094261578e+256): 0
* [misc]none:  (-4.347828572616086e-184 -2.2415468254308968e-275 5.41731325733976e-115): 0
* [misc]none:  (1.0395093493101161e-28 -6.035695609668586e-193 5.540829799846932e-307): 1
* [misc]none:  (-6.2448878184443784e-195 8.949756960721031e-195 2.722605535602291e+155): 0
* [misc]none:  (-4.714069429956778e+287 2.9453252035345084e+174 -5.843713571039491e+54): 2
* [misc]none:  (1.0160216232612932e-143 -2.425692316345541e+35 -2.0645141541195737e-123): 0
* [misc]none:  (4.178563936936926e-127 2.1657839461347663e+307 6.629963208070179e-180): 0
* [misc]none:  (-7.809772272521888e+231 -1.0023220030653375e-143 2.5453262068352747e+307): 2
* [misc]none:  (-1.1570938550413644e-156 1.7005338626981419e-143 7.808994559121766e-111): 2
* [misc]none:  (8.788013174305029e-230 -2.708463803258993e-217 2.5557776305939374e+86): 0
* [misc]none:  (-7.843719408056975e+200 -5.36699847063349e-281 -5.474411714258796e-200): 0
* [misc]none:  (3.2454192740264175e-113 4.896551008070313e-307 1.2607016124581028e+98): 0
* [misc]none:  (-2.1121060804534514e-153 -3.946147066150504e-295 6.351701463874224e-34): 2
* [misc]none:  (1.1127979592570306e-297 -1.1510973857640039e-232 -1.6396360397102689e+220): 0
* [misc]none:  (-4.631295923206326e+93 -3.257471673811612e-50 -8.226715035278119e-287): 1
* [misc]none:  (-2.255644969852512e+52 2.0134175477923286e-117 3.3910436622012204e+183): 0
* [misc]none:  (2.1370924660732585e-137 -1.9002484997441084e+30 5.027318832526334e+284): 0
* [misc]none:  (1.0214816826091913e+147 -2.018162200747419e+293 9.44950370602155e+215): 0
* [misc]none:  (1.453842915541268e+187 -2.867904353761743e+219 -2.421523337020965e+257): 0
* [misc]none:  (4.172324580820008e-133 1.6563474243613627e-33 -1.7776992082231396e+54): 0
* [misc]none:  (-1.628700320265257e-151 2.0971939106770033e-216 -1.434814592155953e+91): 0
* [misc]none:  (1.504878381563487e-123 -3.141023895275641e+245 -3.001476290410935e-269): 2
* [misc]none:  (8.06210226572923e-308 1.3704592194822044e+306 1.5354587375460247e+100): 0
* [misc]none:  (-4.31661667731193e-265 2.0724540688985427e-14 7.930730410937821e+23): 0
* [misc]none:  (1.2219765589404705e+117 -2.933277138800709e+90 4.8815870270916733e+188): 2
* [misc]none:  (-1.5358179930137542e+240 -4.258931337566508e+98 -1.144012682699149e-39): 0
* [misc]none:  (6.537529222720653e-92 -1.945641295132362e+247 -2.0251187412162225e-215): 1
* [misc]none:  (3.5709688782890513e-43 4.870593988390179e-194 5.0297272719312193e+287): 0
* [misc]none:  (-4.2293501993920744e-96 -2.936155159322882e+301 -7.874126038339784e+73): 0
* [misc]none:  (-2.0493644688447925e+84 5.027897585816787e-27 -3.868283935462521e-278): 0
* [misc]none:  (0.3310558223342685 -7.980090992758681e-50 -1.0048785011627561e-129): 1
* [misc]none:  (8.127248813391785e+226 -1.483643755550628e-284 -2.8769042098391767e+238): 0
* [misc]none:  (-1.2522521950389272e-257 7.299372666988037e-80 3.506434173585025e+201): 0
* [misc]none:  (1.1750256677114723e+302 1.7531612809893653e+136 8.844853331262414e+38): 0
* [misc]none:  (1.178943808525994e-266 9.178781884958768e+207 1.0483964125162862e-06): 0
* [misc]none:  (-3.752236763580095e-230 8.105463665693362e-194 -2.7685933486986245e+247): 0
* [misc]none:  (3.9135950474809954e+67 -2.028037433935809e-224 -3.943510659225903e+212): 0
* [misc]none:  (8.87668088957479e+21 4.513009124607983e-82 -1.952161770664997e+168): 0
* [misc]none:  (-3.2026896500136593e+106 3.9964248706286793e+300 4.3776582898304966e+81): 0
* [misc]none:  (1.5274484190953342e-17 -2.5573519175490938e+242 -7.753367484782891e-85): 1
* [misc]none:  (-1.7158977874206925e-283 -1.532955510659015e-241 3.0568938748675284e-154): 0
* [misc]none:  (2.0291756699515804e-73 8.435011553475053e-247 -8.143702901727175e-109): 1
* [misc]none:  (1.2307420681126962e+74 2.4920454965720488e-241 -1.1022915791865336e+23): 1
* [misc]none:  (-4.4511831232730076e-54 6.667510734837939e+231 -5.374019621331118e+178): 0
* [misc]none:  (8.63476246502244e-94 1.1480211985789131e-156 4.954650634110254e+246): 0
* [misc]none:  (-4.9266537053540385e-269 4.091190676322657e-21 -4.404055326509536e-182): 2
* [misc]none:  (-1.5576281112600038e-142 -3.785849338481499e+20 -3.2892975748009025e-252): 0
* [misc]none:  (-6.133557683770476e-223 -1.497130859851894e+57 3.826166416762639e+216): 0
* [misc]none:  (1.1663715170234023e-33 1.821316082219445e-31 -1.441560479175162e+51): 1
* [misc]none:  (-4.8973687170160837e+185 5.965572216773997e-266 -1.7112087034006054e+282): 2
* [misc]none:  (-8.627178870504794e+293 1.1867578517998852e-122 -1.1961490139198145e+35): 2
* [misc]none:  (4.388887965185748e-231 -3.990775770507464e-143 12041477.739790332): 0
* [misc]none:  (-1.3991744780612765e+87 -1.8538245512787994e+136 4.053980966469101e+302): 0
* [misc]none:  (2.8402608015100704e-250 -1348564663705.779 -4.759757548074155e+194): 0
* [misc]none:  (4.52129342202891e+175 -1.6048248782469113e+61 -3.969668283468194e-23): 0
* [misc]none:  (5.258242405229196e-247 -9.498386678851063e-197 -1.0709835258895982e+166): 0
* [misc]none:  (2.0947420887546095e+247 -3.0889064673505896e+234 -8.244426084214624e-140): 0
* [misc]none:  (2.1503851256841087e+121 2.5076686139270383e-164 -0.0022300046209729825): 0
* [misc]none:  (1.194061872367895e+220 1.0389358047373285e-37 -2.0087808485765453e-304): 0
* [misc]none:  (1.3687590050193055e-147 -8.234756399670311e-72 1.6542751192792692e-300): 0
* [misc]none:  (-4.773347848801604e-165 -3.5335037548803817e-216 2.602023429993787e-14): 2
* [misc]none:  (-1.4942418769123512e-302 -1.6037432475041464e-152 2.415026600632841e-155): 2
* [misc]none:  (-2.983618099380393e-19 6.08182357871597e-19 3.919727770092923e-28): 0
* [misc]none:  (-8.796417170933511e-157 2.5194286288656994e+137 -2.803376858595825e-183): 0
* [misc]none:  (1.2240297986851114e+251 3.45808714185781e+34 7.826697678487528e+235): 2
* [misc]none:  (-1.210994144233347e-198 -2.0317891841612197e-99 -6.22947928384665e-25): 0
* [misc]none:  (-4.152794278830264e-202 -2.9721370995696006e-116 3.1150480705854042e+199): 0
* [misc]none:  (-1.1101608934114058e+37 5.160642497006506e-106 2.501487961589971e-186): 1
* [misc]none:  (-1.8295893302806206e-270 3.1707458428990324e-50 1.882634228916084e+104): 0
* [misc]none:  (6.309071689177259e-279 1.6670391926080915e+97 1.5332802818158087e+215): 0
* [misc]none:  (-1.0118756898573112e+168 -2.1001979573866983e-194 -4.555748018209325e-271): 0
* [misc]none:  (1.7527084173765072e+214 -3.566410115265179e+77 -2.0754253193237223e+276): 0
* [misc]none:  (1.4185317245467992e+152 -1.3311644893547746e+182 -4.3053676243877875e-107): 0
* [misc]none:  (-2.7534409364060876e-300 -3.678907798082827e-113 6.040835984474006e+24): 0
* [misc]none:  (-3.1450504266029292e+299 -6.998469069018224e-161 -7.470113998819676e+275): 2
* [misc]none:  (-1.8796565426908664e+204 -1.099557535291122e-30 -2.3724946872194442e+266): 2
* [misc]none:  (-9.99618015977074e-100 -5.970362695291997e+22 -3.879179322621676e+202): 0
* [misc]none:  (3.321782785676469e-255 1.5087150874010425e-211 -1.7358857320695963e-267): 0
* [misc]none:  (-1.2383129644834284e+160 -1.062164837135673e+42 2.2752166795075178e+129): 0
* [misc]none:  (3.459069485774471e+125 6.125263020847728e+200 1.0472163764779166e+211): 0
* [misc]none:  (-5.593167094268887e-190 1.7800753731525426e+39 -1.9563965618862005e+178): 0
* [misc]none:  (6.863804525144902e-237 1.2654352929763856e+201 3.676700438802301e-44): 0
* [misc]none:  (-4.5884699527721836e-114 5.519538337069105e+160 -3.884002241527716e-09): 0
* [misc]none:  (3.402956999639796e+258 1.529772447679324e+286 -3.3684544179202395e+273): 2
* [misc]none:  (-7.667160800564504e+201 -1.714192033762561e-105 -3.946016692023138e+286): 0
* [misc]none:  (1.8500142756663922e+65 6.180426682633145e-231 -1.1261653603541554e-107): 1
* [misc]none:  (-2.1793389213345715e+300 1.0083640164314813e-92 6.223068053793711e+127): 2
* [misc]none:  (2.2629994924347574e-07 -3.779843999226174e+139 -3.0614286694593404e-08): 1
* [misc]none:  (-5.8394743012211145e+230 -3.7587461773373327e+104 -1.0123667364292686e-192): 2
* [misc]none:  (-9.804519419015677e-288 -6.5890526844687485e-164 -2.899016522178297e+88): 0
* [misc]none:  (3.6950126077692746e-159 -1.0679075438337597e+159 2.659181518527327e+307): 0
* [misc]none:  (4.6359994596022095e-153 -1.3879444027553083e+305 8.584176116472669): 2
* [misc]none:  (3.802591719422796e-187 -8.074991766140518e+140 1.5800617558402157e+234): 0
* [misc]none:  (1.1606607614301422e-05 3.292067705150785e-57 -1.5601971401908854e-158): 1
* [misc]none:  (3.2577820155263023e+228 -5.2844454198705195e+305 7.723034435941923e+280): 0
* [misc]none:  (-1.0201482567312647e+227 2.333964054476269e-230 2.6282948365587408e-27): 2
* [misc]none:  (-5.91489283060648e-141 -2.941458472796967e-142 2.1831432166025805e+27): 0
* [misc]none:  (1.0985453227849344e-170 -5.571663930953366e+284 -8.610351411523465e+21): 0
* [misc]none:  (2.9274193921182663e+72 3.528685173788366e+131 -3.755398726662252e-104): 1
* [misc]none:  (1.732956797107532e+257 -0.003996887291900194 -3.319613025041288e+219): 0
* [misc]none:  (-2.8353852455895346e-236 2.4977177539308356e+32 6.19863515953618e-206): 2
* [misc]none:  (-6.234997468933024e+98 -1.2483206863621665e-82 -4.3245428365292906e-97): 0
* [misc]none:  (3.1166104193766994e-137 -2.3678767156364688e+110 -3.8121763850001037e+300): 0
* [misc]none:  (9.15071959046392e+15 -5.982768696796655e-301 1.4133605543126447e+178): 0
* [misc]none:  (-5.6835404426458884e-130 -6.116012871916241e+32 -4.56282292938935e+200): 0
* [misc]none:  (4.015919715899847e+137 1.2423686537018865e-16 -2.9190823764550885e+200): 0
* [misc]none:  (-8.369149872118526e+18 -6.505453409904161e-156 -1.571835822103132e-97): 1
* [misc]none:  (-2.3015506367476294e+261 4.559321205979136e-29 8.913124246398817e-290): 0
* [misc]none:  (-1.7739145562626414e-238 -7.800592841851725e-167 -7.036042050158767e-21): 0
* [misc]none:  (220237823157837.84 -1.0913289326464034e+189 -8.082418571799865e-207): 1
* [misc]none:  (4.4061588303824944e-303 -1.003094753737015e-245 2.971068685413927e+215): 0
* [misc]none:  (-4.9172013791785835e+247 3.20782828662563e+47 -1.3139682089382477e-268): 0
* [misc]none:  (-7.0800974540359565e-196 -1.0695941285170777e+259 2.3040347636911724e-27): 0
* [misc]none:  (7.527413299194134e-199 3.222113461096366e+139 9.80786621090237e-10): 0
* [misc]none:  (-6.984190141903233e+241 -9.583105380205228e+81 -1.1006480359267765e-71): 0
* [misc]none:  (4.5779060099920917e-17 8.583739956121865e-308 -3.5994403684981127e-10): 1
* [misc]none:  (-1.9722299820001865e+94 4.460218679195514e-149 5.690021676770787e+31): 0
* [misc]none:  (5.357335632184978e-22 9.84912431615415e+293 -5.955853021225728e-91): 0
* [misc]none:  (2.236333776084836e+240 8.787526117599876e+89 6.103872924194278e-110): 2
* [misc]none:  (-8.022655362628393e+40 -4.497266801596471e+100 2.4991141371272513e-282): 1
* [misc]none:  (2.4069680102931362e+144 -2.8732816710350813e-128 0.0006145505508753878): 0
* [misc]none:  (5.770600846660463e-216 2.781426133815738e-217 2.5557241024046246e-63): 0
* [misc]none:  (4.40681776351873e+173 -4.1462345069686375e+92 5.223765227005569e-152): 2
* [misc]none:  (-1.6334098586809e+149 -7.52056490230671e+247 7.351668255412019e-155): 0
* [misc]none:  (-5.755383151195205e+172 3.666021857234008e-105 -7.362277309884386e+163): 2
* [misc]none:  (2.1884482458744437e-81 7.345575675668017e+18 -5.064289876067956e+27): 1
* [misc]none:  (8.853831150429422e+166 1.8423314112002953e-90 -2.820439640817216e+236): 0
* [misc]none:  (2.5619404272463737e+146 -5.680359460857034e-50 2.9488263936935035e+118): 0
* [misc]none:  (1.4318039063168714e-09 -5.668682219996358e+270 9.534360742444564e-26): 1
* [misc]none:  (1.2538968992553631e-96 1.2604501780655313e-299 33610193246.41273): 1
* [misc]none:  (-4.7269786251670094e+219 9.689801239106332e+272 2.3118053548193494e+30): 0
* [misc]none:  (-5.491093062090541e+163 4.652749385182812e-160 9.610215461209792e+222): 0
* [misc]none:  All alt indices
* [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) (* (* (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))))))): 1
* [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)))))): 2
* [misc]none:  (λ (J K U) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))): 3
* [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))))): 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:  (9.568527921939742e-273 2.654414227492494e+20 1.7090726067739176e-227): 0
* [misc]none:  (7.696162327562603e-152 -1.7235772956324157e+44 -1.849105607217708e-205): 0
* [misc]none:  (5.106850318067203e-223 -8.776422694060002e-191 -1.0339801069916732e-122): 2
* [misc]none:  (1.3381086996667414e-215 -1.2294460237484715e+92 -9.903617261398821e+48): 0
* [misc]none:  (1.0224180420716733e-52 -5.2868600650398754e+73 9.705038014433044e-175): 0
* [misc]none:  (-2.2377664482363495e-145 -6.863248801263982e-282 6.028770352690154e-151): 0
* [misc]none:  (-425.15997261130053 -1.4215485644178288e+122 6.224141164637054e+75): 0
* [misc]none:  (-1.2086624476009651e-200 2.3623052767393814e+153 4.4633600804799425e+142): 0
* [misc]none:  (-1.6813749551547664e-222 -4.6390246315423324e+36 1.2790861077923577e+68): 0
* [misc]none:  (1.0592112097552954e+143 -7.191398511280425e-59 -2.3255237224962407e-56): 0
* [misc]none:  (1.6780592368033288e-262 1.5331200777386884e+269 2.973444851318118e-169): 0
* [misc]none:  (1.6828576275377584e-98 4.5525663232975395e+86 4.922686678959719e-213): 0
* [misc]none:  (9.601043864442096e+176 5.752669291865014e-257 3.0310347416413137e-258): 0
* [misc]none:  (-1.1043473204259838e-123 -2.06284826271339e+143 -7.24722487096989e+250): 0
* [misc]none:  (-2.2793842908096357e+72 -8.124520965103743e+145 3.727663855470157e+254): 0
* [misc]none:  (8.775974517752829e+204 -644684.1881687096 -5.072621494700167e+267): 0
* [misc]none:  (-4.473451124127099e-235 1.5758037123807388e+87 -3.1154131766396667e+29): 0
* [misc]none:  (2.4492953260422185e+131 5.835395598392501e+198 -1.2951522948212234e+105): 0
* [misc]none:  (2.2545095115116114e+189 -1.4107789582096962e+111 -4.521345173807944e-274): 0
* [misc]none:  (2.4757193927168845e-307 -3.9546390943242443e-82 1.457018723838865e-35): 0
* [misc]none:  (-1.5246504675906286e-147 -1.1042460154015769e-187 -3.30379604621756e-180): 0
* [misc]none:  (-8.185062082112633e+221 9.424239481611678e-294 1.5096638452158614e-71): 0
* [misc]none:  (-1.830572871972773e-27 -1.714392276509888e-289 -9.870003932393336e-46): 0
* [misc]none:  (-2.2727962542731896e+253 6.967234360883543e-112 2.0770495361468835e+203): 0
* [misc]none:  (-3.5348879909542174e+259 3.1401318723071353e-131 -1.4852188300484065e-239): 0
* [misc]none:  (-3.374264737975756e+72 -1.0890756353988414e+102 0.228970627026966): 0
* [misc]none:  (8.40469635347052e+100 2.1321881547753267e-44 1.7739584018359304e-207): 0
* [misc]none:  (-2.723194185823719e-255 6.866799226360426e-109 6.417434319517234e+231): 0
* [misc]none:  (-1.105123941463264e-44 -1.5442050061781137e-296 -2.5125878605191734e-29): 4
* [misc]none:  (4.508352673437809e+248 -1.4801509312754967e-61 -5.163900824605852e+32): 0
* [misc]none:  (1.430295312965348e-149 3.112001531242655e+80 3.0475240801607222e-148): 0
* [misc]none:  (-5.232709143225968e-98 -2.6904647286120434e+306 -2.4014893155423993e+35): 0
* [misc]none:  (1.4966275592591335e-123 6.384545099874781e-168 -1.9863653303691194e-296): 0
* [misc]none:  (-1.5110806788081036e+47 4.232269734875141e-205 4.1020469956028986e+24): 0
* [misc]none:  (2.1703230086091624e+277 -4.725142043601307e-47 2.68866513359689e-174): 0
* [misc]none:  (8.96636707501737e-13 -2.3580830331388543e-23 1.6082525618587168e-259): 0
* [misc]none:  (2.7230496615379425e-188 7.15832835948139e-179 -3.386296042382532e-190): 0
* [misc]none:  (2.991170371343952e+151 -7.407998779781806e-33 -7.014935371531484e-98): 0
* [misc]none:  (-2.580522918977788e+184 8.990843056511833e-32 3.9088008390110404e+59): 0
* [misc]none:  (6.754325943853309e-283 -1.0323836290065946e-292 -1.1379474227414984e+157): 0
* [misc]none:  (-4.747329706134133e-300 -2.266131068741548e-232 6.354961149716869e-97): 0
* [misc]none:  (2.8293820765322485e-296 5.3887495676776976e+171 -503507.16469484643): 0
* [misc]none:  (-1.9250288775511552e-19 9.871143682146977e-239 -1.9809585244792104e-221): 0
* [misc]none:  (-5.324127388080003e+141 5.123849747663666e+133 4.007761912625816e-148): 1
* [misc]none:  (3.321054281872602e+251 -7.33347091133757e-103 -3.967500572333352e+95): 0
* [misc]none:  (-8.002576117532625e+293 -344.7442723289036 8.452539306620761e+219): 0
* [misc]none:  (-3.8897511496224356e+161 4.4485313287564445e+252 -2.9971297913067123e-296): 0
* [misc]none:  (1.120554825473697e-298 7.175557259725409e-49 4.4800031186106794e-70): 0
* [misc]none:  (-1.3609788364339258e+82 2.5265807746711182e-73 1.4440898226736705e-53): 0
* [misc]none:  (-4.651815532356965e+285 -1.223165056942955e+279 2.3912903471184356e-134): 0
* [misc]none:  (3.53511184703484e+158 -2.8955398952451435e+131 1.5780761566396397e+125): 0
* [misc]none:  (1.534059348183312e-189 2.8419420301747055e+90 -2.318158899615234e+28): 0
* [misc]none:  (8.976998414840432e+184 3.9122094377392414e+59 -6.588522440277298e+124): 0
* [misc]none:  (-8.890171102288788e+241 -4.517606044160453e-29 -2.0229301807644786e+90): 0
* [misc]none:  (4.588817619865515e-83 6.908716276621429e+42 1.074034252081928e-96): 0
* [misc]none:  (-2.0525626505030474e-205 1.43328810513268e+174 -3.517237475307537e+70): 0
* [misc]none:  (1.6570172448601563e-137 2.4048926517811354e+66 -1.2386076426807104e+281): 0
* [misc]none:  (4.0623211606609595e-228 1.5982222044177176e+181 8.398043771606399e+47): 0
* [misc]none:  (-6.552213310391902e+218 -2.461870212435176e+181 -9.04145577094214e-51): 0
* [misc]none:  (6.730955893129463e-197 6.724679859609688e-169 1.4230714989143866e-75): 0
* [misc]none:  (3.493084834288097e-125 -8.87002524437924e-05 -9.534297923953677e-238): 0
* [misc]none:  (8.932193317773552e+156 -4.82948997845691e+115 -2.844669102107347e+110): 0
* [misc]none:  (6.614130481633629e+300 -6.631482835790804e+75 -2.927893218629978e+198): 0
* [misc]none:  (-5.425958198218161e-146 -5.212281525360505e+119 1.3240207557849338e+291): 0
* [misc]none:  (-6.155236203506664e+276 3.2574885636926814e-211 -9.779940061204298e+60): 0
* [misc]none:  (1.3680169753287455e-53 -1.5172504298350683e-122 2.2957389429922706e-176): 0
* [misc]none:  (1.3610327499536486e+226 4.84788597345363e+32 1.0657402022625375e+129): 0
* [misc]none:  (-6.206729553564092e+301 1.7927880379985524e+252 -8.795577755360774e-193): 0
* [misc]none:  (1.0006462262322276e+238 -9.304691570184222e+30 1.9963004369674967e-80): 0
* [misc]none:  (1.4604179220567222e+231 1.5216315041338872e-218 1.6707151526371295e-190): 0
* [misc]none:  (5.1990169359560766e-256 -6.08679419260233e+77 -2.864119470500123e-178): 0
* [misc]none:  (-4.976800097081315e-07 8.044445972631143e-28 2.635030752287841e+186): 0
* [misc]none:  (4.12100928340286e-184 9.74865050931635e+298 -7.146083996729688e+199): 0
* [misc]none:  (8.361834195928021e-55 7.311006071291519e-101 -1.2254396192804965e-192): 0
* [misc]none:  (1.782256728493473e+35 6.657191501816709e+167 -1.0237963707243293e+257): 0
* [misc]none:  (-2.376464365888854e-78 -3.222114505301457e-163 -7.76766480776823e+37): 0
* [misc]none:  (8.382633428275648e-297 -6.191205901832185e+168 2.0703305241322436e+71): 0
* [misc]none:  (6.099737398723264e-279 2.6679523035634032e-104 8.366391802268445e+167): 0
* [misc]none:  (2.870509274337958e-101 -2.318802051809187e-21 -2.362056093523898e-236): 0
* [misc]none:  (4.384610242475067e+141 1.4474621781713568e+65 -1.410046620426318e-213): 0
* [misc]none:  (-4.423020421030483e+291 -3.178469867925502e-246 -7.447731371021966e+71): 0
* [misc]none:  (5.154503491655989e+241 -1.6398756117817188e+244 -5.198066934157678e+220): 0
* [misc]none:  (5.0588074473585105e-110 3.742291531299835e+250 5.013161881068948e+307): 0
* [misc]none:  (66089027839097.664 1.4351275309127672e-234 4.416557773834991e-25): 0
* [misc]none:  (-7.605311329977112e+177 3.0442880854679596e-31 -1.3989503218776358e-06): 0
* [misc]none:  (4.664141571059094e-118 -1.8512083623442292e+194 -1.3284106669669889e+173): 0
* [misc]none:  (1.0684729481870001e-64 6.3073426358942834e+75 -2.217199084242749e+17): 1
* [misc]none:  (3.1520683467019444e-71 0.19659739803111875 7.786539791485611e+181): 0
* [misc]none:  (2.4995037253728046e-268 -26830062846468156.0 4.637177905335891e-10): 0
* [misc]none:  (-12679727921.874447 8.652041834233969e-101 -3.577245999178336e-189): 0
* [misc]none:  (3.209451012414084e+270 3.7907433031673317e-256 8.76720870691781e-247): 0
* [misc]none:  (6.160331831501279e+241 -4.568727829143705e-23 -1.757665168464323e+292): 0
* [misc]none:  (-7.388307231162813e-47 3.4124175886179475e+199 3.0044088767799776e-30): 0
* [misc]none:  (4.7140908881238785e+103 2.3604863517900675e+30 6.476730028728146e-228): 0
* [misc]none:  (-1.2222609474395545e-52 3.369115258471057e+173 1.3383461391823352e+303): 0
* [misc]none:  (-2.6712990814490822e+247 2.3157792094796435e+174 -9.842315617180003e+283): 0
* [misc]none:  (-8.795626148255621e+120 -5.857596831984434e-95 4.097601147132013e-78): 0
* [misc]none:  (4.194634882433556e+107 -1.1526493241483084e+241 3.3390334975960143e-07): 1
* [misc]none:  (-1.8082167822566404e+183 2.2475155879831534e-92 -4.169290160322216e+246): 0
* [misc]none:  (1.030614327019319e-115 -3.2696794723802255e-27 1.8172920677413648e+103): 0
* [misc]none:  (-5.3218781381905035e-129 -2.362048596457182e+298 -6.16723792553022e+40): 0
* [misc]none:  (-2.40789942954366e+44 -2.9998533512328024e-144 -1.4147186694962813e-176): 0
* [misc]none:  (1.186346974675696e+155 -1.2827160692503531e+104 6.283729883572828e+84): 0
* [misc]none:  (3.6636765762957594e-187 1.7036347403091437e+117 9.645064592867311e+67): 0
* [misc]none:  (-5.1224941914889595e+118 1.3872947227834175e-251 7.12145855246931e-10): 0
* [misc]none:  (-4.3661371414490136e+281 -1.4301261995935981e+54 2.693461062117409e-112): 0
* [misc]none:  (1.6465279540530418e+78 2.43524332605807e-278 1.0576788912710565e-08): 0
* [misc]none:  (-17241.138101224224 4.764080499693186e-90 -7.290271346747531e-14): 0
* [misc]none:  (1.3557350350348342e+244 -1.3554385625614067e+48 -1.8946459759589086e-22): 0
* [misc]none:  (1.89639974853721e+92 8.2625435987749e+74 5.2790261762422465e+19): 0
* [misc]none:  (2.0179287053921742e+58 2.884705125857619e-274 2.031068672850261e-255): 0
* [misc]none:  (2.4294527094706238e+82 7.274711555473555e+146 1.5565784464325313e+71): 0
* [misc]none:  (1.2222184804619167e+37 -5.55277905008488e-191 -2.1360290498375943e+32): 0
* [misc]none:  (4.642568065399805e-260 -4.493058001076021e-21 -2.6740094065663153e+105): 0
* [misc]none:  (3.8347842435652736e+125 -9.848724265902522e+103 7.178809205583962e-175): 1
* [misc]none:  (-3.8059392134174312e-280 -3.954815085266754e+305 1.4235559851356953e-239): 0
* [misc]none:  (4.74667737826054e-29 -1.2486100740485319e+302 -143677164285.72263): 0
* [misc]none:  (-4.897389787642899e+104 1.868517529275615e+140 -2.5024214599876482e+172): 0
* [misc]none:  (1.5276944825842992e+272 2.1335024129380783e-97 1.0953112641111952e+229): 0
* [misc]none:  (3.2587696828142436e+75 -1.5310860302360472e-220 3.7735141958833343e+170): 0
* [misc]none:  (1.0233799517176219e-267 -9.329140131915071e-38 5.348181441205713e-277): 0
* [misc]none:  (-5.024170449312866e+115 -1.611431508373217e+195 2.6631876145177815e-299): 0
* [misc]none:  (-1.3496423811442664e+228 -6.4194246582119476e+212 -6.796944270882852e-34): 0
* [misc]none:  (1.4781375733319608e-242 -2.1294463337627754e-19 3.003847336951168e+42): 0
* [misc]none:  (1.6609596531041104e-183 -6.156933300042242e+249 -2.249022094261578e+256): 0
* [misc]none:  (-4.347828572616086e-184 -2.2415468254308968e-275 5.41731325733976e-115): 0
* [misc]none:  (1.0395093493101161e-28 -6.035695609668586e-193 5.540829799846932e-307): 0
* [misc]none:  (-6.2448878184443784e-195 8.949756960721031e-195 2.722605535602291e+155): 0
* [misc]none:  (-4.714069429956778e+287 2.9453252035345084e+174 -5.843713571039491e+54): 0
* [misc]none:  (1.0160216232612932e-143 -2.425692316345541e+35 -2.0645141541195737e-123): 0
* [misc]none:  (4.178563936936926e-127 2.1657839461347663e+307 6.629963208070179e-180): 0
* [misc]none:  (-7.809772272521888e+231 -1.0023220030653375e-143 2.5453262068352747e+307): 0
* [misc]none:  (-1.1570938550413644e-156 1.7005338626981419e-143 7.808994559121766e-111): 0
* [misc]none:  (8.788013174305029e-230 -2.708463803258993e-217 2.5557776305939374e+86): 0
* [misc]none:  (-7.843719408056975e+200 -5.36699847063349e-281 -5.474411714258796e-200): 0
* [misc]none:  (3.2454192740264175e-113 4.896551008070313e-307 1.2607016124581028e+98): 0
* [misc]none:  (-2.1121060804534514e-153 -3.946147066150504e-295 6.351701463874224e-34): 0
* [misc]none:  (1.1127979592570306e-297 -1.1510973857640039e-232 -1.6396360397102689e+220): 0
* [misc]none:  (-4.631295923206326e+93 -3.257471673811612e-50 -8.226715035278119e-287): 0
* [misc]none:  (-2.255644969852512e+52 2.0134175477923286e-117 3.3910436622012204e+183): 0
* [misc]none:  (2.1370924660732585e-137 -1.9002484997441084e+30 5.027318832526334e+284): 0
* [misc]none:  (1.0214816826091913e+147 -2.018162200747419e+293 9.44950370602155e+215): 0
* [misc]none:  (1.453842915541268e+187 -2.867904353761743e+219 -2.421523337020965e+257): 0
* [misc]none:  (4.172324580820008e-133 1.6563474243613627e-33 -1.7776992082231396e+54): 0
* [misc]none:  (-1.628700320265257e-151 2.0971939106770033e-216 -1.434814592155953e+91): 0
* [misc]none:  (1.504878381563487e-123 -3.141023895275641e+245 -3.001476290410935e-269): 0
* [misc]none:  (8.06210226572923e-308 1.3704592194822044e+306 1.5354587375460247e+100): 0
* [misc]none:  (-4.31661667731193e-265 2.0724540688985427e-14 7.930730410937821e+23): 0
* [misc]none:  (1.2219765589404705e+117 -2.933277138800709e+90 4.8815870270916733e+188): 0
* [misc]none:  (-1.5358179930137542e+240 -4.258931337566508e+98 -1.144012682699149e-39): 0
* [misc]none:  (6.537529222720653e-92 -1.945641295132362e+247 -2.0251187412162225e-215): 0
* [misc]none:  (3.5709688782890513e-43 4.870593988390179e-194 5.0297272719312193e+287): 0
* [misc]none:  (-4.2293501993920744e-96 -2.936155159322882e+301 -7.874126038339784e+73): 0
* [misc]none:  (-2.0493644688447925e+84 5.027897585816787e-27 -3.868283935462521e-278): 0
* [misc]none:  (0.3310558223342685 -7.980090992758681e-50 -1.0048785011627561e-129): 0
* [misc]none:  (8.127248813391785e+226 -1.483643755550628e-284 -2.8769042098391767e+238): 0
* [misc]none:  (-1.2522521950389272e-257 7.299372666988037e-80 3.506434173585025e+201): 0
* [misc]none:  (1.1750256677114723e+302 1.7531612809893653e+136 8.844853331262414e+38): 0
* [misc]none:  (1.178943808525994e-266 9.178781884958768e+207 1.0483964125162862e-06): 0
* [misc]none:  (-3.752236763580095e-230 8.105463665693362e-194 -2.7685933486986245e+247): 0
* [misc]none:  (3.9135950474809954e+67 -2.028037433935809e-224 -3.943510659225903e+212): 0
* [misc]none:  (8.87668088957479e+21 4.513009124607983e-82 -1.952161770664997e+168): 0
* [misc]none:  (-3.2026896500136593e+106 3.9964248706286793e+300 4.3776582898304966e+81): 0
* [misc]none:  (1.5274484190953342e-17 -2.5573519175490938e+242 -7.753367484782891e-85): 0
* [misc]none:  (-1.7158977874206925e-283 -1.532955510659015e-241 3.0568938748675284e-154): 0
* [misc]none:  (2.0291756699515804e-73 8.435011553475053e-247 -8.143702901727175e-109): 0
* [misc]none:  (1.2307420681126962e+74 2.4920454965720488e-241 -1.1022915791865336e+23): 0
* [misc]none:  (-4.4511831232730076e-54 6.667510734837939e+231 -5.374019621331118e+178): 0
* [misc]none:  (8.63476246502244e-94 1.1480211985789131e-156 4.954650634110254e+246): 0
* [misc]none:  (-4.9266537053540385e-269 4.091190676322657e-21 -4.404055326509536e-182): 0
* [misc]none:  (-1.5576281112600038e-142 -3.785849338481499e+20 -3.2892975748009025e-252): 0
* [misc]none:  (-6.133557683770476e-223 -1.497130859851894e+57 3.826166416762639e+216): 0
* [misc]none:  (1.1663715170234023e-33 1.821316082219445e-31 -1.441560479175162e+51): 3
* [misc]none:  (-4.8973687170160837e+185 5.965572216773997e-266 -1.7112087034006054e+282): 0
* [misc]none:  (-8.627178870504794e+293 1.1867578517998852e-122 -1.1961490139198145e+35): 0
* [misc]none:  (4.388887965185748e-231 -3.990775770507464e-143 12041477.739790332): 0
* [misc]none:  (-1.3991744780612765e+87 -1.8538245512787994e+136 4.053980966469101e+302): 0
* [misc]none:  (2.8402608015100704e-250 -1348564663705.779 -4.759757548074155e+194): 0
* [misc]none:  (4.52129342202891e+175 -1.6048248782469113e+61 -3.969668283468194e-23): 0
* [misc]none:  (5.258242405229196e-247 -9.498386678851063e-197 -1.0709835258895982e+166): 0
* [misc]none:  (2.0947420887546095e+247 -3.0889064673505896e+234 -8.244426084214624e-140): 0
* [misc]none:  (2.1503851256841087e+121 2.5076686139270383e-164 -0.0022300046209729825): 0
* [misc]none:  (1.194061872367895e+220 1.0389358047373285e-37 -2.0087808485765453e-304): 0
* [misc]none:  (1.3687590050193055e-147 -8.234756399670311e-72 1.6542751192792692e-300): 0
* [misc]none:  (-4.773347848801604e-165 -3.5335037548803817e-216 2.602023429993787e-14): 0
* [misc]none:  (-1.4942418769123512e-302 -1.6037432475041464e-152 2.415026600632841e-155): 0
* [misc]none:  (-2.983618099380393e-19 6.08182357871597e-19 3.919727770092923e-28): 0
* [misc]none:  (-8.796417170933511e-157 2.5194286288656994e+137 -2.803376858595825e-183): 0
* [misc]none:  (1.2240297986851114e+251 3.45808714185781e+34 7.826697678487528e+235): 0
* [misc]none:  (-1.210994144233347e-198 -2.0317891841612197e-99 -6.22947928384665e-25): 0
* [misc]none:  (-4.152794278830264e-202 -2.9721370995696006e-116 3.1150480705854042e+199): 0
* [misc]none:  (-1.1101608934114058e+37 5.160642497006506e-106 2.501487961589971e-186): 0
* [misc]none:  (-1.8295893302806206e-270 3.1707458428990324e-50 1.882634228916084e+104): 0
* [misc]none:  (6.309071689177259e-279 1.6670391926080915e+97 1.5332802818158087e+215): 0
* [misc]none:  (-1.0118756898573112e+168 -2.1001979573866983e-194 -4.555748018209325e-271): 0
* [misc]none:  (1.7527084173765072e+214 -3.566410115265179e+77 -2.0754253193237223e+276): 0
* [misc]none:  (1.4185317245467992e+152 -1.3311644893547746e+182 -4.3053676243877875e-107): 0
* [misc]none:  (-2.7534409364060876e-300 -3.678907798082827e-113 6.040835984474006e+24): 0
* [misc]none:  (-3.1450504266029292e+299 -6.998469069018224e-161 -7.470113998819676e+275): 0
* [misc]none:  (-1.8796565426908664e+204 -1.099557535291122e-30 -2.3724946872194442e+266): 5
* [misc]none:  (-9.99618015977074e-100 -5.970362695291997e+22 -3.879179322621676e+202): 0
* [misc]none:  (3.321782785676469e-255 1.5087150874010425e-211 -1.7358857320695963e-267): 0
* [misc]none:  (-1.2383129644834284e+160 -1.062164837135673e+42 2.2752166795075178e+129): 1
* [misc]none:  (3.459069485774471e+125 6.125263020847728e+200 1.0472163764779166e+211): 0
* [misc]none:  (-5.593167094268887e-190 1.7800753731525426e+39 -1.9563965618862005e+178): 0
* [misc]none:  (6.863804525144902e-237 1.2654352929763856e+201 3.676700438802301e-44): 0
* [misc]none:  (-4.5884699527721836e-114 5.519538337069105e+160 -3.884002241527716e-09): 0
* [misc]none:  (3.402956999639796e+258 1.529772447679324e+286 -3.3684544179202395e+273): 0
* [misc]none:  (-7.667160800564504e+201 -1.714192033762561e-105 -3.946016692023138e+286): 0
* [misc]none:  (1.8500142756663922e+65 6.180426682633145e-231 -1.1261653603541554e-107): 0
* [misc]none:  (-2.1793389213345715e+300 1.0083640164314813e-92 6.223068053793711e+127): 0
* [misc]none:  (2.2629994924347574e-07 -3.779843999226174e+139 -3.0614286694593404e-08): 0
* [misc]none:  (-5.8394743012211145e+230 -3.7587461773373327e+104 -1.0123667364292686e-192): 0
* [misc]none:  (-9.804519419015677e-288 -6.5890526844687485e-164 -2.899016522178297e+88): 0
* [misc]none:  (3.6950126077692746e-159 -1.0679075438337597e+159 2.659181518527327e+307): 0
* [misc]none:  (4.6359994596022095e-153 -1.3879444027553083e+305 8.584176116472669): 0
* [misc]none:  (3.802591719422796e-187 -8.074991766140518e+140 1.5800617558402157e+234): 0
* [misc]none:  (1.1606607614301422e-05 3.292067705150785e-57 -1.5601971401908854e-158): 0
* [misc]none:  (3.2577820155263023e+228 -5.2844454198705195e+305 7.723034435941923e+280): 0
* [misc]none:  (-1.0201482567312647e+227 2.333964054476269e-230 2.6282948365587408e-27): 0
* [misc]none:  (-5.91489283060648e-141 -2.941458472796967e-142 2.1831432166025805e+27): 0
* [misc]none:  (1.0985453227849344e-170 -5.571663930953366e+284 -8.610351411523465e+21): 0
* [misc]none:  (2.9274193921182663e+72 3.528685173788366e+131 -3.755398726662252e-104): 0
* [misc]none:  (1.732956797107532e+257 -0.003996887291900194 -3.319613025041288e+219): 0
* [misc]none:  (-2.8353852455895346e-236 2.4977177539308356e+32 6.19863515953618e-206): 0
* [misc]none:  (-6.234997468933024e+98 -1.2483206863621665e-82 -4.3245428365292906e-97): 0
* [misc]none:  (3.1166104193766994e-137 -2.3678767156364688e+110 -3.8121763850001037e+300): 0
* [misc]none:  (9.15071959046392e+15 -5.982768696796655e-301 1.4133605543126447e+178): 0
* [misc]none:  (-5.6835404426458884e-130 -6.116012871916241e+32 -4.56282292938935e+200): 0
* [misc]none:  (4.015919715899847e+137 1.2423686537018865e-16 -2.9190823764550885e+200): 0
* [misc]none:  (-8.369149872118526e+18 -6.505453409904161e-156 -1.571835822103132e-97): 0
* [misc]none:  (-2.3015506367476294e+261 4.559321205979136e-29 8.913124246398817e-290): 0
* [misc]none:  (-1.7739145562626414e-238 -7.800592841851725e-167 -7.036042050158767e-21): 0
* [misc]none:  (220237823157837.84 -1.0913289326464034e+189 -8.082418571799865e-207): 0
* [misc]none:  (4.4061588303824944e-303 -1.003094753737015e-245 2.971068685413927e+215): 0
* [misc]none:  (-4.9172013791785835e+247 3.20782828662563e+47 -1.3139682089382477e-268): 0
* [misc]none:  (-7.0800974540359565e-196 -1.0695941285170777e+259 2.3040347636911724e-27): 0
* [misc]none:  (7.527413299194134e-199 3.222113461096366e+139 9.80786621090237e-10): 0
* [misc]none:  (-6.984190141903233e+241 -9.583105380205228e+81 -1.1006480359267765e-71): 0
* [misc]none:  (4.5779060099920917e-17 8.583739956121865e-308 -3.5994403684981127e-10): 0
* [misc]none:  (-1.9722299820001865e+94 4.460218679195514e-149 5.690021676770787e+31): 0
* [misc]none:  (5.357335632184978e-22 9.84912431615415e+293 -5.955853021225728e-91): 0
* [misc]none:  (2.236333776084836e+240 8.787526117599876e+89 6.103872924194278e-110): 0
* [misc]none:  (-8.022655362628393e+40 -4.497266801596471e+100 2.4991141371272513e-282): 4
* [misc]none:  (2.4069680102931362e+144 -2.8732816710350813e-128 0.0006145505508753878): 0
* [misc]none:  (5.770600846660463e-216 2.781426133815738e-217 2.5557241024046246e-63): 0
* [misc]none:  (4.40681776351873e+173 -4.1462345069686375e+92 5.223765227005569e-152): 0
* [misc]none:  (-1.6334098586809e+149 -7.52056490230671e+247 7.351668255412019e-155): 0
* [misc]none:  (-5.755383151195205e+172 3.666021857234008e-105 -7.362277309884386e+163): 0
* [misc]none:  (2.1884482458744437e-81 7.345575675668017e+18 -5.064289876067956e+27): 0
* [misc]none:  (8.853831150429422e+166 1.8423314112002953e-90 -2.820439640817216e+236): 0
* [misc]none:  (2.5619404272463737e+146 -5.680359460857034e-50 2.9488263936935035e+118): 0
* [misc]none:  (1.4318039063168714e-09 -5.668682219996358e+270 9.534360742444564e-26): 0
* [misc]none:  (1.2538968992553631e-96 1.2604501780655313e-299 33610193246.41273): 0
* [misc]none:  (-4.7269786251670094e+219 9.689801239106332e+272 2.3118053548193494e+30): 0
* [misc]none:  (-5.491093062090541e+163 4.652749385182812e-160 9.610215461209792e+222): 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-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) (* (* (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* J -2) (cos (/ K 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt-delta (λ (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)))))> #<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)))))))>)
* [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