* [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 (393 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -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
"ALT DATA: "{"all-alts":["#<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>"],"best-fresh-alt-per-point":[[[-7.097835734746746e+218,1.6219172946297815e+205,-5.707405484951641e+252],0,0],[[2.5842129352573833e+157,2.03476018732095e+119,2.3993845233584173e-107],0,1.0],[[-1.3908305214282044e-154,-2.4923117032686953e+197,-3.7981733760926524e-59],0,0],[[6.8367221822693645e+171,-2.485557599167403e+61,3.637969744290734e+272],0,0],[[3.6070289902878433e-298,2.4220868488775713e+174,-6.924414872876826e+121],0,61.27455062667296],[[-8.127295724709651e+188,1.4680641340515712e+37,2.130535351053153e+251],0,0],[[-6.59522455933465e-44,9.732025433837372e-298,4.3186153363237085e+196],0,60.534670692689666],[[4.717376995390811e-229,-2.3341562724578147e+138,-1.7808212315293658e-267],0,0],[[7.890896542811938e+189,-1.260155462227717e+139,-4.3402484094339546e-98],0,1.0],[[-2.1518590613428118e+57,-3.8472878924535176e-69,1.921602658997656e+224],0,60.12392332543967],[[-1.0752803839894087e-102,-2.4043032639901138e-220,7.317333208039203e-135],0,0],[[-3.5874867218821053e-289,6.639161457381533e+272,7.51766164914667e-83],0,62.340805957937846],[[1.2494134226790036e-90,5.2370439997769816e-251,-1.3732814838912222e+218],0,60.226141843328364],[[-147062523.161634,2.29835853317011e+39,3.8297412694520027e-72],0,0],[[-6.728931476030476e-220,-3.8960057277485095e+62,9.751429336071956e-111],0,0],[[3.4632829335752192e-251,-5.571648378152749e-24,-1.5013788162994641e-139],0,0],[[-2.647005178779469e+185,1.8598894186132259e+137,-3.3947387264781975e-158],0,0],[[2.9019277223709396e-286,-5.0486763504289305e+297,-2.2447560163594899e+161],0,60.93074969374858],[[5.463725192370479e+166,-3.3667834592100016e+22,-2.536436058187021e+276],0,0],[[1.2810755089251013e+75,9.138814505421974e-66,2.6556986431700894e-172],0,0],[[-2.8093867946453197,3.515792627928699e+199,9.597291263463799e+33],0,0],[[1.8150897130550793e+234,3.165542051316829e+57,1.579252672267158e+84],0,1.0],[[-7.8825607621194955e+93,1.1209809220161085e-271,-4.5883837368201683e+216],0,0],[[-3.255819812723566e-280,2.34479875841816e+59,5.702786507831075e+76],0,61.586896051932605],[[-1.7985967492432066e-181,-2.29441662020671e+209,-2.7064948575317953e+102],0,61.41741290190064],[[-5.456612900256313e-153,-1.6440819958925954e-123,8.045725952292009e+27],0,61.863218624207455],[[-3.267629569827715e-251,-8.654617709875635e-36,-5.243244850188282e+70],0,61.624065708565425],[[-1.2177356660474435e-254,7.810899588463585e-172,9.291488452698296e+167],0,60.86428026193053],[[-7.50461175805814e-258,-2.2074245476722926e-139,3.7649062113016876e-174],0,0],[[-2.831440759739633e+280,3.247555001847955e-09,-3.0357084245012946e-130],0,0],[[-6.590241440058156e+158,-3.600398183547405e+279,9.099484178294087e-276],0,0],[[-1.236864784914523e+307,-2.3539834087406223e+176,-1.1399021272637037e+283],0,0],[[1.2224178423718919e+201,-8.576640958071904e-118,-1.945904698138074e+294],0,0],[[-3.685865083311364e-22,3.264541092685341e+28,9.725416649719138e+252],0,59.520999571980504],[[-7.779967944948024e+102,-1.2524242674835265e-178,6.950896233858705e-22],0,0],[[-4.076760961819094e-307,-9.77225532658453e-187,4.4532169971988716e-248],0,0],[[-5.323110058228719e+306,1.1685596793963991e+198,-2.6353579322600854e+190],0,0],[[-1.9050852423101186e+177,3.272100701705269e+216,7.435874100938545e+127],0,0],[[1.7367008233662004e-146,3.241242127032787e+189,-1.8989429074771432e-61],0,0],[[-1.196163833446424e-216,-2.482218997015813e-79,-4.8603401847979466e+293],0,57.59925762427263],[[-7.885752610457983e-237,-1.8011585194123284e+244,1.710179159392655e-230],0,0],[[-4.865962690031574e-57,-9.009421056215597e-142,-5.6291122105439806e+206],0,60.3976604012631],[[-2.0273370129970457e+293,-3.089328922376561e+38,1.7761334469972786e+272],0,0],[[-6.458816293530837e+32,1.2314425699492343e+144,-4.391490797054204e-127],0,0],[[-1.3671559872942241e+32,1.7931450786375e+207,6.7889504343027e+141],0,0],[[3.717688415206528e-63,4.2329024975964494e-120,1.5110472870035968e-137],0,0],[[-3.071247325847018e+168,1.6394729264619353e-305,-2.427270407266838e-292],0,0],[[-2.2380108691988367e+176,-2.2804753660027636e-184,-417.84894784071446],0,0],[[1.273007442525311e+205,-860404.0745975035,9.790032000289722e-170],0,1.0],[[1.748601585802626e+143,-2.7501066713881833e-45,6.1586742802359446e+280],0,0],[[-7.693537982561176e+228,1.4196179692273589e+51,-1.816962027309807e-87],0,1.0],[[2.0434027565243845e+254,15210.1761529531,-2.7933732390832485e+50],0,1.0],[[-7.045510436190759e+250,3.865070822820752e-125,4.405711435557941e-18],0,0],[[6.86860201817031e+37,-3.6003931204734074e+177,2.9793076670648235e+135],0,0],[[-1.0747586880572918e-225,-3.914306845273933e+191,3.4461982003189476e-271],0,0],[[4.994366090310223e+293,2.9675638609500463e-266,8.497595544438243e+196],0,0],[[-2.4291085511930378e-57,3.7184381896827443e-109,9.342278142177427e-261],0,0],[[-1.9641025336330274e-36,1.5030419663802974e-174,-3.0809655420404695e-28],0,1.0],[[-2.439062442778655e-102,0.18720893918478226,-3.4986244195491495e-274],0,0],[[8.713457448965708e+55,1.3423233293291483e-162,1.7094985902294833e-299],0,0],[[-4.806258092707348e+97,-3.1666396733025884e-13,6.443766269775323e+116],0,0],[[-2.4346037043150295e+140,1.2878875837081438e-81,-1.2369049141682215e-238],0,0],[[-1.7508318798883553e+27,-1.626718674009136e+164,-2.303287936653167e+103],0,0],[[3.802507995980374e-176,-4.3021363265330954e+273,1.2952736416079913e-172],0,0],[[-1.654438597637836e+210,-4.5087835058803264e-119,-4.76358476622384e-40],0,0],[[-4.4587503598222035e-69,2.220662619570457e+252,-3.220071167646315e+167],0,60.869238566188756],[[-1.894259608196097e+90,3.61050150366864e+208,-4.4100791718387096e+222],0,0],[[9.426838129136436e+163,-2.3181506163130386e+81,4.678580995434083e-146],0,0],[[2.6773769570729964e-91,-3.685146484696044e-133,-6.601969142405229e+46],0,0],[[-2.267428170639853e+292,1.0258897434193047e+31,3.867922064222235e-78],0,0],[[6.811775981980025e+18,1.4782394318457476e-109,-5.609454405888344e-131],0,0],[[-1.9166323121487114e-233,-8.914664962649548e-28,6.125036550218122e+186],0,60.65675482516793],[[2.738458460650558e+50,1.2054688632397534e+33,-5.575910688006958e+201],0,0],[[-1.7060173400540982e-279,1.692419472494387e-152,-8.508186045528442e-232],0,0],[[3.496596375732988e-212,-1.7601344029867343e-290,-2.7467829813272228e+287],0,58.11261916665845],[[7.5963065745174464e-06,1.6348045764158446e-257,-4.607089829824939e-06],0,0],[[4.821955799677156e-289,-2.3184172477948065e+196,1.7483065599934842e+85],0,61.53308646175488],[[-1.0057412795601501e-141,0.060556571647326925,1.8480052807692756e-77],0,0],[[8.452451609890028e+85,3.450903835999846e-213,4.495110039324184e-82],0,0],[[-1.3252476549554923e-172,-1.2400400292246446e+273,-2.099587820327233e-176],0,1.0],[[-1.753002269819775e+157,2.229461735274287e-223,-5.461310186136003e+131],0,0],[[-1.265259404413343e-89,-1.0963427561332458e-156,5.741222418922647e-41],0,0],[[7.0181404927126106e+305,-1.1560520854064811e-178,3.6484688752466967e-69],0,0],[[-3.312607218501177e+276,5.094611782176626e-183,-3.6242962787554164e+165],0,0],[[-1.0064448966798171e+198,-4.253682617948995e-243,-1.6600604267765295e-45],0,0],[[-1.2261367936338352e-64,9.383817895669287e-283,3.611278323934413e-94],0,0],[[1.6564415223201099e+136,-6.991593686636276e+190,-6.602809642561733e-223],0,0],[[-4.485222205559527e+248,1.4448618247603424e-257,3.706054342154294e-129],0,0],[[7.195448856340728e-141,3384824.3314616154,-4.510161549039838e-214],0,1.0],[[-9.543517271590036e+203,2.6544319953421338e+293,1.1509772202461854e+130],0,0],[[7.876423561266471e+22,-5.7183056168804695e+262,2.809919074811328e-300],0,1.0],[[2.1859104172563636e-264,-1.6313740517107182e-227,-7.512222795104406e-168],0,0],[[-82504272040715.1,9.260475542482052e+299,-2.191896168863437e-98],0,1.0],[[-1.9194647450105577e+144,-5.02014609669523e+254,-3.3925149777052834e-63],0,0],[[8.359355849775862e-16,1.3310146389530143e+163,-1.3274409717698955e-301],0,0],[[-7.543647802930883e-65,4.6811315760090616e-144,2.043780925156358e+88],0,0],[[-1.3285899852668203e+268,-2.1307490533826745e+196,-2.6253419032181803e+196],0,0],[[1.046624167704608e-163,3.4631943627882644e+200,-1.3964572346787755e-152],0,1.0],[[-7.807986006964459e-172,4.648142651511719e+239,-4.519595929536516e-229],0,0],[[-1.3448163575524206e-16,-1.423542426143039e-129,-2.969699723262003e+31],0,0],[[5.903833024524204e-224,-5.866052212830613e+219,-2.0449888976508749e+136],0,61.157957079708986],[[6.75061600976492e-09,-6.990575505691825e-293,-2.097700040267997e+32],0,0],[[-1.0183335489303076e-199,-2.2046896841875876e+105,4.0526523047213233e+244],0,59.72462417842582],[[-4.630105582658964e+112,1.5043274345617834e+228,-231.6086328505263],0,0],[[-16083688965753228.0,-2.915269426177489e-188,-1.1146873205045003e+50],0,0],[[9.861253466270416e+140,6.509917256919526e-155,-1.235130140170164e-126],0,0],[[2.0740305822111617e-302,2.156659933698441e+65,-7.1479705794644704e+252],0,59.5239545806469],[[-3.7138781240413885e-204,-7.263550849085613e-27,5.582278109308679e-72],0,0],[[-9.324073911343234e-97,1.329109205730971e+18,2.480190476546545e-246],0,0],[[7.542398567020551e-205,3.211003609332114e-292,-2.9988557709871706e-297],0,0],[[-3.841622556722524e-66,4.607613593823294e-213,1.705817703400908e+63],0,0],[[-1.1204577574966285e-246,-4.921050894675189e-140,2.0974429565133816e-215],0,0],[[-8.048358363486665e+120,8.530068169212586e+207,2.905639146095198e+214],0,0],[[-9.958023069471933e+213,3.554023312793441e+160,1.51646550817889e-257],0,1.0],[[-0.0007363022252445651,-1.7841118844999841e+249,9.88160538195634e+236],0,59.88743993573152],[[-5.624997011130711e-126,2.3719183352628996e+212,-1.9742436392168267e+216],0,60.255350889881406],[[-1.0155994341356255e+111,1.1988791635038015e-56,-171.37335414723813],0,0],[[-1.7491621663626818e+238,-4.226402616530443e+259,3.50550012204851e-33],0,0],[[-7.497175243828372e+204,1.708686197016133e+79,-3.1472164561505567e-59],0,0],[[-8.05737758242569e-91,1.0057242501199301e-254,-3.222264666704597e-210],0,0],[[1.099315532911349e-23,-2.4132101870415246e+120,-7.586221492885147e-139],0,0],[[-358605196789223.75,1.4540832115601766e+80,-4.5561147022013495e+203],0,60.441063559764686],[[3.224104279734413e-128,3.8655618297451507e+264,-6.394924897500658e-104],0,0],[[-4.266935350404457e+257,-4.095681815309281e+187,6.029252458259788e+248],0,1.0],[[-1.3489282606511781e-35,2.45682697544046e-235,-1.7051167618207031e+156],0,60.98017647400547],[[-3.448018665551091e+46,4.65318267035879e+212,1.7198556401156944e+40],0,0],[[-2.868627256931542e+282,-2.532452753214596e+217,-1.0726845205664223e-63],0,0],[[-3.2017078238224426e+292,-7.4224082205270185e+121,5.394314721089183e-302],0,0],[[-3.023055730501428e-23,-1.175878359064847e-77,-3.9529958064865946e-264],0,0],[[3.6553350706241625e-209,5.073224629669749e-209,-1.2641746276125557e-259],0,0],[[-6.168869222825437e-92,-4.977701482488331e-274,2.2777945340735493e-276],0,0],[[-3.5687398900842987e+52,-8.51976038766166e+293,1.0871440614151498e+289],0,57.997392776194935],[[-1.4372534866880888e+234,4.876905254991102e+285,1.2894750780678564e+300],0,1.0],[[-1.6235425325048555e+261,1.4618355052890434e+227,3.043685036732137e-200],0,1.0],[[1.4920285944075702e-53,-1.738586776813829e-222,7.628653541085044e+123],0,61.258701434077615],[[4.493452818771822e-125,-1.980605354536306e-231,1.4342996382753786e-68],0,0],[[1.0963301159009184e-183,3.231394614843413e+95,-5.8891022224162905e+299],0,56.81973218624375],[[-171636426038343.06,8.895467702359268e-17,-9.062606466177737e-237],0,0],[[-4.005659624811191e+200,-18632706462072732.0,-4.1068770028392473e+21],0,0],[[-1.3688696209191408e-102,-2.0036982767287855e-282,7.084339583278926e+216],0,60.24657717169728],[[3.879381526714617e+231,-4.612024538520277e+39,1.1166277726761266e+39],0,0],[[-1.7089084754270419e-12,-1.469508077318514e+98,1.8687286825225081e+205],0,60.41843201467783],[[-9.164501627196514e-190,-5.450210145640886e-309,-2.8266439589935105e+168],0,60.859541086901274],[[2.8321391439452527e-177,1.0865881933967427e-239,1.0321884324238089e-204],0,0],[[-6.605881759005181e+183,2.194953362823915e+177,-4.99895221232182e+182],0,1.0],[[1.3687884379108643e+17,3.468363920687483e-275,9.235058182301351e-298],0,0],[[-1.0915024824878794e+32,1.3508330812519037e-42,-7.643304163425191e-132],0,0],[[3.258549790458107e-45,2.1316535898912934e-76,-5.329618293165233e+254],0,59.474631968114856],[[2.2420303907903802e-68,-4.147815060644267e-269,-1.5885079051767335e-90],0,0],[[-3.969894456140893e-15,-1.317053669789009e+53,5.776745162887772e-81],0,0],[[2.3939618552975763e+242,-4.127632732628039e+21,3.161587187966589e+82],0,0],[[3.2633957345317127e+251,2.0474783165414538e-126,-1.8675181824308287e+123],0,0],[[5.5609724703152094e-123,-9.698832524909335e+106,4.871284163370267e-185],0,0],[[1.9117791443554203e-134,-1.1788306068444453e-175,-7.2672182309421e-153],0,0],[[788647938.445347,-5.600514306056783e-289,-3.4507996665333636e-44],0,0],[[7.4751406322111975e-208,7.348751680152543e-306,5.656765710936691e-76],0,0],[[1.961831527193424e-60,-1.0262805742626176e-88,7.655606647706524e-307],0,0],[[-3.4535699470035837e-158,1.027405627074826e+260,-1.0089466879026102e-120],0,0],[[-8.150217400699526e-187,-1.081567422425548e+106,-7.328272485377685e-51],0,0],[[-5.600850699676017e-216,-4.569457869050411e-204,3.981491076325477e+229],0,60.02988735115003],[[-5.201902814304858e+287,-8.370936497660456e+147,1.6703871447091801e-184],0,0],[[3.294798454877577e-109,-1.1634672830494242e+297,5.873882793788073e+304],0,55.54370003871646],[[-2.5842611121723686e-83,1.9827401749271262e+183,2.468160393597418e+16],0,0],[[-4.3156972913392805e-297,2.339761031458555e-169,3.943485742551043e+214],0,60.28155775404954],[[8.23935440322281e-255,-6.993566496172953e-149,1.2414218620136766e+210],0,60.34922351850937],[[-1.8008197600788473e-210,-9.339382943714191e+219,-1.9724572392550013e+269],0,59.01688122601553],[[4.2958727261014584e+36,6.328184874755262e+301,1.7255846811749406e-291],0,1.0],[[-2.8873539429251243e+113,9.723806270790304e+261,3.669186107808967e-292],0,0],[[1.4160598314001593e+222,7.17939675829627e-158,5.706174991628051e-294],0,0],[[-8.833333360285963e+123,1.6543220134558954e+211,-2.0075913201092103e-110],0,0],[[-5.799494962865382e+179,-1.9221933359897497e-164,-4.223847889069915e-247],0,0],[[-7.412818439865646e+79,-1.1943364123385422e-44,-2.891150086994789e-239],0,0],[[7.759258852634933e-78,20833.64667003459,2.4398615081868066e+205],0,60.41694135189651],[[-1.242717444963877e+43,2.3948670500504287e-261,6.2092037474963055e+231],0,59.98868627570155],[[2.3255349808732236e+289,-1.1280084353956664e-216,-8.464143987770504e+171],0,0],[[-2.0051342910565085e+265,6.413626161349299e-227,560488966.1174189],0,0],[[2.0882744776400718e-286,-1.930574277247469e-202,1.751208589172235e-52],0,62.22394337671404],[[2.9688880181416084,-2.3040207927157378e-96,-6.579373556970536e-52],0,0],[[-4.194881103238641e+21,9.475383647572687e+150,-4.825887791830381e+144],0,0],[[1.5628986347380075e+167,8.340556674905215e+77,-3.6999440436536584e-49],0,0],[[7.077452111412406e-295,3.966194599780254e-223,3.7838902349270595e+124],0,61.25316496124588],[[4.700763524863875e+204,-2.9207329416306686e+217,1.3073288890631414e+280],0,0],[[-7.693815148540151e+114,3.2964836323184035e-155,-5.3525540351311954e-281],0,0],[[8.40015631920143e-267,5.7735379314244544e+135,-2.6804016066367006e-31],0,62.136530907271094],[[1.3086604894940812e-227,5.110728256051039e-260,-2.2230057586741136e-141],0,0],[[5.996749315117597e+34,-2.0470315990098174e-13,-3.551599710870501e-79],0,0],[[-1.3512698516924462e+222,4.5201803639304495e+192,3.8910566195656857e-199],0,1.0],[[-3.0811702649623344e-274,2.3443867491657545e+246,-6.131456919104946e-248],0,0],[[-8.64483328785185e-272,2.6015556795165393e-281,3.569525897033803e-203],0,0],[[-3.696014574690946e+253,-6.234818190089148e-22,1.0433422764871603e+92],0,0],[[2.911945305258545e+76,1.607081485572248e+287,3.0951906535851436e+156],0,0],[[-2.304902569428671e-278,4.842080607450392e+183,-1.3710886835561032e-37],0,62.16307349980139],[[-3.0626399470140506e+19,1.9567613186327648e-98,1.3180753941144182e-147],0,0],[[-7.302755623144034e-92,2.034142710886352e+76,2.645632745156305e+72],0,61.61379429787259],[[-1.64305460819134e+147,-1.925191351645937e-38,5.916620005010986e-284],0,0],[[1.1331561154624403e-183,3.1554708951547898e+299,-2.1365439373622427e-112],0,0],[[3.710994234954979e+213,3.820878202523467e-296,1.7176479621738321e-282],0,0],[[4.1035311994183654e+275,2.1154012951226925e+268,-1.1203373459545064e-225],0,0],[[-1.1644934250212247e+195,-1.778006036463959e-243,1.4447268620911757e-89],0,0],[[1.0420632008764305e-255,-6.647381994040776e+28,7.492863265092149e+193],0,60.56975525027214],[[-2.22550224200597e-215,-4.4202281498453134e-210,-2.7561614443533105e+307],0,53.47169079070351],[[2.1023881259435715e-142,1.2286041871551853e+305,-7.250968489147593e+121],0,61.27436649836295],[[6.890711381796581e-252,-7.546945266760574e-90,-2.69825319383642e-133],0,0],[[1.677162052730813e-59,8.686388033007487e-215,-1.3149636586628956e+118],0,61.303087464099775],[[-6.201577640216828e-76,-2.9590397071500346e+28,-4.926806733013528e-158],0,0],[[-5.170525455803253e+144,3.4859445720092225e-35,4.821982933878669e+175],0,0],[[-1.1185816621821212e-94,4.344638216165875e-288,-1.7812260516570316e-155],0,0],[[1.187362624897409e+112,-3.4014587503013307e-66,-5.491335421336957e+149],0,1.0],[[6.919932177490866,-3.539516667629656e+281,-1.127329219926809e-187],0,0],[[-1.1349630928255783e-207,-1.1559445604370315e+288,-3.57999533002613e+292],0,57.706151226316194],[[1.1966617966615715e+32,-1.308443002203369e+86,-6.664362743500172e-29],0,0],[[6.432750463800895e+170,-1.1888721424009163e-144,-1.7040442460095513e-75],0,0],[[-4.744869685397997e-163,1.1038900376070258e-272,1.1135903314955052e+244],0,59.73720740931781],[[8.192710157560433e-306,2.5216713222419557e+200,2.7861975952274327e-251],0,0],[[-2.265074770534004e+131,7.839670149925818e-278,-1.735573807040294e+70],0,0],[[-3.286716298820313e-41,-3.0870693428253524e+115,-1.6615507340775114e+268],0,59.05521258753139],[[-3.6366540230121064e+282,-4.5628330785036e-235,3.412298361507663e+104],0,0],[[3.4304207896824764e+78,-1.5862298780284405e+234,-3.5257614939229864e+45],0,1.0],[[1.1418903566588686e+202,3.057923656733621e+257,1.9635189108773308e+208],0,1.0],[[9.104095698506237e+247,-1.395378566558569e-155,-1.008849602168032e-147],0,0],[[1.5309364148291473e+20,3.009607083325416e-208,4.696040142948554e+202],0,60.45451216541414],[[-1.4929980720652086e+294,1.672328230858498e-214,-7.579010248497065e+83],0,0],[[3.603857068482743e+158,2.9731168912425227e+223,5.5230827984860495e-214],0,1.0],[[1.2569177198304213e+35,-1.396741088899253e-104,-1.2533180509137805e-282],0,0],[[0.056030027328489294,-1.6941667724887288e+108,1.3453300471233885e+129],0,0],[[8.548941388682517e-48,2.8670290078668156e+257,9.339975929055322e+155],0,60.98274136957115],[[-5.333959628058546e-35,-1.37284104484469e-193,9.19691126799929e+93],0,0],[[-2.7507146943094008e-114,-4.541303516304554e-153,2.6063194423749796e+134],0,61.17384117792451],[[-7.49044213263508e+291,-1.3788096112971466e-169,2.068929278551331e+156],0,0],[[-2.6265804345369346e+191,1.9899626460259247e-13,-9.596430455745706e+100],0,0],[[5.3364583166991444e+300,-3.088836913113676e+107,-4.497723396184308e+249],0,1.0],[[-2.0013485306413847e-258,3.307434389659611e+110,-80722015057.35544],0,61.948112167540074],[[5.0305259690686196e-231,1.1795612077485763e+52,-7.81439769323426e-309],0,0],[[4.1188846940311216e-171,1.1856484764854597e+269,-1.3692306833325666e-157],0,0],[[1.2500602811876808e+40,2.953363332574606e-238,-4.612923893847788e+233],0,59.95326148053716],[[1.6986948886824323e+126,2.0155846495512064e+173,-7.577132280246575e+93],0,0],[[-6.227793500436146e+292,1.0729156452384357e-137,-2.1995102488491374e+92],0,0],[[1.051973877170815e-298,-2.35103610402023e+214,-1.762241542725527e+256],0,59.43317937302809],[[-3.1275696969283374e-124,1.8331795202945072e-122,7.707961271807703e-168],0,0],[[4.142690958783731e-85,2.3636227077055366e+106,-1.2013940617586167e+160],0,60.94336737312885],[[1.170023224533326e-179,-2.647095342829477e-193,-7.384894716657131e+275],0,58.75043075221173],[[1.4462182673219785e-257,6.1701670079874715e-148,-3.4096344247463026e+169],0,60.84821815160063],[[-1.3672693428204055e+119,3.515536684928011e+206,-9.852495186821838e-109],0,0],[[9.581945296609061e+205,-8.171851610632133e-29,3.9211741729059833e+93],0,0],[[-7.207768437261981e+41,1.8636896603361692e+300,2.703480388506777e-207],0,0],[[6.763159401082614e-231,5.60029751695527e-74,-3.996639231722599e-250],0,0],[[-1.660792857124932e-193,1.0163117083670472e-178,1.2848677963582702e+197],0,60.52857576061055],[[3.716620345265454e+191,1.2808656209351454e-308,-8.261513904855362e+50],0,0],[[4.079715673979633e+117,-2.897784303481398e+193,-1.7680917188681742],0,0],[[-5.893156054960838e-209,-1.2838742763593962e-306,3.2540486993164457e+100],0,61.4307459360689],[[-1.3215125919708138e-66,-1.1348077011704342e-165,1.415228692978329e+55],0,0],[[2.8299772476719073e-248,-1.5516908711200715e+114,-1.5546063348868015e+175],0,60.788019299475785],[[-7.91477975257425e-178,1.0120915835571524e+263,2.9738216870275134e+189],0,60.62448515013275],[[1.534294812232018e+296,3.6432528648228024e-99,-1.078537986809811e+95],0,0],[[-5.971284384303698e-181,-1.165108214722553e+183,-3.131868129995754e-179],0,0],[[-4.893796482840715e-96,2.3933397594674356e+274,-1.065087959176633e-15],0,0]],"fresh-alts":["#<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>"],"picked-error":15.158266615564472,"best-alt-per-point":[[[-7.097835734746746e+218,1.6219172946297815e+205,-5.707405484951641e+252],0,0],[[2.5842129352573833e+157,2.03476018732095e+119,2.3993845233584173e-107],0,1.0],[[-1.3908305214282044e-154,-2.4923117032686953e+197,-3.7981733760926524e-59],0,0],[[6.8367221822693645e+171,-2.485557599167403e+61,3.637969744290734e+272],0,0],[[3.6070289902878433e-298,2.4220868488775713e+174,-6.924414872876826e+121],0,61.27455062667296],[[-8.127295724709651e+188,1.4680641340515712e+37,2.130535351053153e+251],0,0],[[-6.59522455933465e-44,9.732025433837372e-298,4.3186153363237085e+196],0,60.534670692689666],[[4.717376995390811e-229,-2.3341562724578147e+138,-1.7808212315293658e-267],0,0],[[7.890896542811938e+189,-1.260155462227717e+139,-4.3402484094339546e-98],0,1.0],[[-2.1518590613428118e+57,-3.8472878924535176e-69,1.921602658997656e+224],0,60.12392332543967],[[-1.0752803839894087e-102,-2.4043032639901138e-220,7.317333208039203e-135],0,0],[[-3.5874867218821053e-289,6.639161457381533e+272,7.51766164914667e-83],0,62.340805957937846],[[1.2494134226790036e-90,5.2370439997769816e-251,-1.3732814838912222e+218],0,60.226141843328364],[[-147062523.161634,2.29835853317011e+39,3.8297412694520027e-72],0,0],[[-6.728931476030476e-220,-3.8960057277485095e+62,9.751429336071956e-111],0,0],[[3.4632829335752192e-251,-5.571648378152749e-24,-1.5013788162994641e-139],0,0],[[-2.647005178779469e+185,1.8598894186132259e+137,-3.3947387264781975e-158],0,0],[[2.9019277223709396e-286,-5.0486763504289305e+297,-2.2447560163594899e+161],0,60.93074969374858],[[5.463725192370479e+166,-3.3667834592100016e+22,-2.536436058187021e+276],0,0],[[1.2810755089251013e+75,9.138814505421974e-66,2.6556986431700894e-172],0,0],[[-2.8093867946453197,3.515792627928699e+199,9.597291263463799e+33],0,0],[[1.8150897130550793e+234,3.165542051316829e+57,1.579252672267158e+84],0,1.0],[[-7.8825607621194955e+93,1.1209809220161085e-271,-4.5883837368201683e+216],0,0],[[-3.255819812723566e-280,2.34479875841816e+59,5.702786507831075e+76],0,61.586896051932605],[[-1.7985967492432066e-181,-2.29441662020671e+209,-2.7064948575317953e+102],0,61.41741290190064],[[-5.456612900256313e-153,-1.6440819958925954e-123,8.045725952292009e+27],0,61.863218624207455],[[-3.267629569827715e-251,-8.654617709875635e-36,-5.243244850188282e+70],0,61.624065708565425],[[-1.2177356660474435e-254,7.810899588463585e-172,9.291488452698296e+167],0,60.86428026193053],[[-7.50461175805814e-258,-2.2074245476722926e-139,3.7649062113016876e-174],0,0],[[-2.831440759739633e+280,3.247555001847955e-09,-3.0357084245012946e-130],0,0],[[-6.590241440058156e+158,-3.600398183547405e+279,9.099484178294087e-276],0,0],[[-1.236864784914523e+307,-2.3539834087406223e+176,-1.1399021272637037e+283],0,0],[[1.2224178423718919e+201,-8.576640958071904e-118,-1.945904698138074e+294],0,0],[[-3.685865083311364e-22,3.264541092685341e+28,9.725416649719138e+252],0,59.520999571980504],[[-7.779967944948024e+102,-1.2524242674835265e-178,6.950896233858705e-22],0,0],[[-4.076760961819094e-307,-9.77225532658453e-187,4.4532169971988716e-248],0,0],[[-5.323110058228719e+306,1.1685596793963991e+198,-2.6353579322600854e+190],0,0],[[-1.9050852423101186e+177,3.272100701705269e+216,7.435874100938545e+127],0,0],[[1.7367008233662004e-146,3.241242127032787e+189,-1.8989429074771432e-61],0,0],[[-1.196163833446424e-216,-2.482218997015813e-79,-4.8603401847979466e+293],0,57.59925762427263],[[-7.885752610457983e-237,-1.8011585194123284e+244,1.710179159392655e-230],0,0],[[-4.865962690031574e-57,-9.009421056215597e-142,-5.6291122105439806e+206],0,60.3976604012631],[[-2.0273370129970457e+293,-3.089328922376561e+38,1.7761334469972786e+272],0,0],[[-6.458816293530837e+32,1.2314425699492343e+144,-4.391490797054204e-127],0,0],[[-1.3671559872942241e+32,1.7931450786375e+207,6.7889504343027e+141],0,0],[[3.717688415206528e-63,4.2329024975964494e-120,1.5110472870035968e-137],0,0],[[-3.071247325847018e+168,1.6394729264619353e-305,-2.427270407266838e-292],0,0],[[-2.2380108691988367e+176,-2.2804753660027636e-184,-417.84894784071446],0,0],[[1.273007442525311e+205,-860404.0745975035,9.790032000289722e-170],0,1.0],[[1.748601585802626e+143,-2.7501066713881833e-45,6.1586742802359446e+280],0,0],[[-7.693537982561176e+228,1.4196179692273589e+51,-1.816962027309807e-87],0,1.0],[[2.0434027565243845e+254,15210.1761529531,-2.7933732390832485e+50],0,1.0],[[-7.045510436190759e+250,3.865070822820752e-125,4.405711435557941e-18],0,0],[[6.86860201817031e+37,-3.6003931204734074e+177,2.9793076670648235e+135],0,0],[[-1.0747586880572918e-225,-3.914306845273933e+191,3.4461982003189476e-271],0,0],[[4.994366090310223e+293,2.9675638609500463e-266,8.497595544438243e+196],0,0],[[-2.4291085511930378e-57,3.7184381896827443e-109,9.342278142177427e-261],0,0],[[-1.9641025336330274e-36,1.5030419663802974e-174,-3.0809655420404695e-28],0,1.0],[[-2.439062442778655e-102,0.18720893918478226,-3.4986244195491495e-274],0,0],[[8.713457448965708e+55,1.3423233293291483e-162,1.7094985902294833e-299],0,0],[[-4.806258092707348e+97,-3.1666396733025884e-13,6.443766269775323e+116],0,0],[[-2.4346037043150295e+140,1.2878875837081438e-81,-1.2369049141682215e-238],0,0],[[-1.7508318798883553e+27,-1.626718674009136e+164,-2.303287936653167e+103],0,0],[[3.802507995980374e-176,-4.3021363265330954e+273,1.2952736416079913e-172],0,0],[[-1.654438597637836e+210,-4.5087835058803264e-119,-4.76358476622384e-40],0,0],[[-4.4587503598222035e-69,2.220662619570457e+252,-3.220071167646315e+167],0,60.869238566188756],[[-1.894259608196097e+90,3.61050150366864e+208,-4.4100791718387096e+222],0,0],[[9.426838129136436e+163,-2.3181506163130386e+81,4.678580995434083e-146],0,0],[[2.6773769570729964e-91,-3.685146484696044e-133,-6.601969142405229e+46],0,0],[[-2.267428170639853e+292,1.0258897434193047e+31,3.867922064222235e-78],0,0],[[6.811775981980025e+18,1.4782394318457476e-109,-5.609454405888344e-131],0,0],[[-1.9166323121487114e-233,-8.914664962649548e-28,6.125036550218122e+186],0,60.65675482516793],[[2.738458460650558e+50,1.2054688632397534e+33,-5.575910688006958e+201],0,0],[[-1.7060173400540982e-279,1.692419472494387e-152,-8.508186045528442e-232],0,0],[[3.496596375732988e-212,-1.7601344029867343e-290,-2.7467829813272228e+287],0,58.11261916665845],[[7.5963065745174464e-06,1.6348045764158446e-257,-4.607089829824939e-06],0,0],[[4.821955799677156e-289,-2.3184172477948065e+196,1.7483065599934842e+85],0,61.53308646175488],[[-1.0057412795601501e-141,0.060556571647326925,1.8480052807692756e-77],0,0],[[8.452451609890028e+85,3.450903835999846e-213,4.495110039324184e-82],0,0],[[-1.3252476549554923e-172,-1.2400400292246446e+273,-2.099587820327233e-176],0,1.0],[[-1.753002269819775e+157,2.229461735274287e-223,-5.461310186136003e+131],0,0],[[-1.265259404413343e-89,-1.0963427561332458e-156,5.741222418922647e-41],0,0],[[7.0181404927126106e+305,-1.1560520854064811e-178,3.6484688752466967e-69],0,0],[[-3.312607218501177e+276,5.094611782176626e-183,-3.6242962787554164e+165],0,0],[[-1.0064448966798171e+198,-4.253682617948995e-243,-1.6600604267765295e-45],0,0],[[-1.2261367936338352e-64,9.383817895669287e-283,3.611278323934413e-94],0,0],[[1.6564415223201099e+136,-6.991593686636276e+190,-6.602809642561733e-223],0,0],[[-4.485222205559527e+248,1.4448618247603424e-257,3.706054342154294e-129],0,0],[[7.195448856340728e-141,3384824.3314616154,-4.510161549039838e-214],0,1.0],[[-9.543517271590036e+203,2.6544319953421338e+293,1.1509772202461854e+130],0,0],[[7.876423561266471e+22,-5.7183056168804695e+262,2.809919074811328e-300],0,1.0],[[2.1859104172563636e-264,-1.6313740517107182e-227,-7.512222795104406e-168],0,0],[[-82504272040715.1,9.260475542482052e+299,-2.191896168863437e-98],0,1.0],[[-1.9194647450105577e+144,-5.02014609669523e+254,-3.3925149777052834e-63],0,0],[[8.359355849775862e-16,1.3310146389530143e+163,-1.3274409717698955e-301],0,0],[[-7.543647802930883e-65,4.6811315760090616e-144,2.043780925156358e+88],0,0],[[-1.3285899852668203e+268,-2.1307490533826745e+196,-2.6253419032181803e+196],0,0],[[1.046624167704608e-163,3.4631943627882644e+200,-1.3964572346787755e-152],0,1.0],[[-7.807986006964459e-172,4.648142651511719e+239,-4.519595929536516e-229],0,0],[[-1.3448163575524206e-16,-1.423542426143039e-129,-2.969699723262003e+31],0,0],[[5.903833024524204e-224,-5.866052212830613e+219,-2.0449888976508749e+136],0,61.157957079708986],[[6.75061600976492e-09,-6.990575505691825e-293,-2.097700040267997e+32],0,0],[[-1.0183335489303076e-199,-2.2046896841875876e+105,4.0526523047213233e+244],0,59.72462417842582],[[-4.630105582658964e+112,1.5043274345617834e+228,-231.6086328505263],0,0],[[-16083688965753228.0,-2.915269426177489e-188,-1.1146873205045003e+50],0,0],[[9.861253466270416e+140,6.509917256919526e-155,-1.235130140170164e-126],0,0],[[2.0740305822111617e-302,2.156659933698441e+65,-7.1479705794644704e+252],0,59.5239545806469],[[-3.7138781240413885e-204,-7.263550849085613e-27,5.582278109308679e-72],0,0],[[-9.324073911343234e-97,1.329109205730971e+18,2.480190476546545e-246],0,0],[[7.542398567020551e-205,3.211003609332114e-292,-2.9988557709871706e-297],0,0],[[-3.841622556722524e-66,4.607613593823294e-213,1.705817703400908e+63],0,0],[[-1.1204577574966285e-246,-4.921050894675189e-140,2.0974429565133816e-215],0,0],[[-8.048358363486665e+120,8.530068169212586e+207,2.905639146095198e+214],0,0],[[-9.958023069471933e+213,3.554023312793441e+160,1.51646550817889e-257],0,1.0],[[-0.0007363022252445651,-1.7841118844999841e+249,9.88160538195634e+236],0,59.88743993573152],[[-5.624997011130711e-126,2.3719183352628996e+212,-1.9742436392168267e+216],0,60.255350889881406],[[-1.0155994341356255e+111,1.1988791635038015e-56,-171.37335414723813],0,0],[[-1.7491621663626818e+238,-4.226402616530443e+259,3.50550012204851e-33],0,0],[[-7.497175243828372e+204,1.708686197016133e+79,-3.1472164561505567e-59],0,0],[[-8.05737758242569e-91,1.0057242501199301e-254,-3.222264666704597e-210],0,0],[[1.099315532911349e-23,-2.4132101870415246e+120,-7.586221492885147e-139],0,0],[[-358605196789223.75,1.4540832115601766e+80,-4.5561147022013495e+203],0,60.441063559764686],[[3.224104279734413e-128,3.8655618297451507e+264,-6.394924897500658e-104],0,0],[[-4.266935350404457e+257,-4.095681815309281e+187,6.029252458259788e+248],0,1.0],[[-1.3489282606511781e-35,2.45682697544046e-235,-1.7051167618207031e+156],0,60.98017647400547],[[-3.448018665551091e+46,4.65318267035879e+212,1.7198556401156944e+40],0,0],[[-2.868627256931542e+282,-2.532452753214596e+217,-1.0726845205664223e-63],0,0],[[-3.2017078238224426e+292,-7.4224082205270185e+121,5.394314721089183e-302],0,0],[[-3.023055730501428e-23,-1.175878359064847e-77,-3.9529958064865946e-264],0,0],[[3.6553350706241625e-209,5.073224629669749e-209,-1.2641746276125557e-259],0,0],[[-6.168869222825437e-92,-4.977701482488331e-274,2.2777945340735493e-276],0,0],[[-3.5687398900842987e+52,-8.51976038766166e+293,1.0871440614151498e+289],0,57.997392776194935],[[-1.4372534866880888e+234,4.876905254991102e+285,1.2894750780678564e+300],0,1.0],[[-1.6235425325048555e+261,1.4618355052890434e+227,3.043685036732137e-200],0,1.0],[[1.4920285944075702e-53,-1.738586776813829e-222,7.628653541085044e+123],0,61.258701434077615],[[4.493452818771822e-125,-1.980605354536306e-231,1.4342996382753786e-68],0,0],[[1.0963301159009184e-183,3.231394614843413e+95,-5.8891022224162905e+299],0,56.81973218624375],[[-171636426038343.06,8.895467702359268e-17,-9.062606466177737e-237],0,0],[[-4.005659624811191e+200,-18632706462072732.0,-4.1068770028392473e+21],0,0],[[-1.3688696209191408e-102,-2.0036982767287855e-282,7.084339583278926e+216],0,60.24657717169728],[[3.879381526714617e+231,-4.612024538520277e+39,1.1166277726761266e+39],0,0],[[-1.7089084754270419e-12,-1.469508077318514e+98,1.8687286825225081e+205],0,60.41843201467783],[[-9.164501627196514e-190,-5.450210145640886e-309,-2.8266439589935105e+168],0,60.859541086901274],[[2.8321391439452527e-177,1.0865881933967427e-239,1.0321884324238089e-204],0,0],[[-6.605881759005181e+183,2.194953362823915e+177,-4.99895221232182e+182],0,1.0],[[1.3687884379108643e+17,3.468363920687483e-275,9.235058182301351e-298],0,0],[[-1.0915024824878794e+32,1.3508330812519037e-42,-7.643304163425191e-132],0,0],[[3.258549790458107e-45,2.1316535898912934e-76,-5.329618293165233e+254],0,59.474631968114856],[[2.2420303907903802e-68,-4.147815060644267e-269,-1.5885079051767335e-90],0,0],[[-3.969894456140893e-15,-1.317053669789009e+53,5.776745162887772e-81],0,0],[[2.3939618552975763e+242,-4.127632732628039e+21,3.161587187966589e+82],0,0],[[3.2633957345317127e+251,2.0474783165414538e-126,-1.8675181824308287e+123],0,0],[[5.5609724703152094e-123,-9.698832524909335e+106,4.871284163370267e-185],0,0],[[1.9117791443554203e-134,-1.1788306068444453e-175,-7.2672182309421e-153],0,0],[[788647938.445347,-5.600514306056783e-289,-3.4507996665333636e-44],0,0],[[7.4751406322111975e-208,7.348751680152543e-306,5.656765710936691e-76],0,0],[[1.961831527193424e-60,-1.0262805742626176e-88,7.655606647706524e-307],0,0],[[-3.4535699470035837e-158,1.027405627074826e+260,-1.0089466879026102e-120],0,0],[[-8.150217400699526e-187,-1.081567422425548e+106,-7.328272485377685e-51],0,0],[[-5.600850699676017e-216,-4.569457869050411e-204,3.981491076325477e+229],0,60.02988735115003],[[-5.201902814304858e+287,-8.370936497660456e+147,1.6703871447091801e-184],0,0],[[3.294798454877577e-109,-1.1634672830494242e+297,5.873882793788073e+304],0,55.54370003871646],[[-2.5842611121723686e-83,1.9827401749271262e+183,2.468160393597418e+16],0,0],[[-4.3156972913392805e-297,2.339761031458555e-169,3.943485742551043e+214],0,60.28155775404954],[[8.23935440322281e-255,-6.993566496172953e-149,1.2414218620136766e+210],0,60.34922351850937],[[-1.8008197600788473e-210,-9.339382943714191e+219,-1.9724572392550013e+269],0,59.01688122601553],[[4.2958727261014584e+36,6.328184874755262e+301,1.7255846811749406e-291],0,1.0],[[-2.8873539429251243e+113,9.723806270790304e+261,3.669186107808967e-292],0,0],[[1.4160598314001593e+222,7.17939675829627e-158,5.706174991628051e-294],0,0],[[-8.833333360285963e+123,1.6543220134558954e+211,-2.0075913201092103e-110],0,0],[[-5.799494962865382e+179,-1.9221933359897497e-164,-4.223847889069915e-247],0,0],[[-7.412818439865646e+79,-1.1943364123385422e-44,-2.891150086994789e-239],0,0],[[7.759258852634933e-78,20833.64667003459,2.4398615081868066e+205],0,60.41694135189651],[[-1.242717444963877e+43,2.3948670500504287e-261,6.2092037474963055e+231],0,59.98868627570155],[[2.3255349808732236e+289,-1.1280084353956664e-216,-8.464143987770504e+171],0,0],[[-2.0051342910565085e+265,6.413626161349299e-227,560488966.1174189],0,0],[[2.0882744776400718e-286,-1.930574277247469e-202,1.751208589172235e-52],0,62.22394337671404],[[2.9688880181416084,-2.3040207927157378e-96,-6.579373556970536e-52],0,0],[[-4.194881103238641e+21,9.475383647572687e+150,-4.825887791830381e+144],0,0],[[1.5628986347380075e+167,8.340556674905215e+77,-3.6999440436536584e-49],0,0],[[7.077452111412406e-295,3.966194599780254e-223,3.7838902349270595e+124],0,61.25316496124588],[[4.700763524863875e+204,-2.9207329416306686e+217,1.3073288890631414e+280],0,0],[[-7.693815148540151e+114,3.2964836323184035e-155,-5.3525540351311954e-281],0,0],[[8.40015631920143e-267,5.7735379314244544e+135,-2.6804016066367006e-31],0,62.136530907271094],[[1.3086604894940812e-227,5.110728256051039e-260,-2.2230057586741136e-141],0,0],[[5.996749315117597e+34,-2.0470315990098174e-13,-3.551599710870501e-79],0,0],[[-1.3512698516924462e+222,4.5201803639304495e+192,3.8910566195656857e-199],0,1.0],[[-3.0811702649623344e-274,2.3443867491657545e+246,-6.131456919104946e-248],0,0],[[-8.64483328785185e-272,2.6015556795165393e-281,3.569525897033803e-203],0,0],[[-3.696014574690946e+253,-6.234818190089148e-22,1.0433422764871603e+92],0,0],[[2.911945305258545e+76,1.607081485572248e+287,3.0951906535851436e+156],0,0],[[-2.304902569428671e-278,4.842080607450392e+183,-1.3710886835561032e-37],0,62.16307349980139],[[-3.0626399470140506e+19,1.9567613186327648e-98,1.3180753941144182e-147],0,0],[[-7.302755623144034e-92,2.034142710886352e+76,2.645632745156305e+72],0,61.61379429787259],[[-1.64305460819134e+147,-1.925191351645937e-38,5.916620005010986e-284],0,0],[[1.1331561154624403e-183,3.1554708951547898e+299,-2.1365439373622427e-112],0,0],[[3.710994234954979e+213,3.820878202523467e-296,1.7176479621738321e-282],0,0],[[4.1035311994183654e+275,2.1154012951226925e+268,-1.1203373459545064e-225],0,0],[[-1.1644934250212247e+195,-1.778006036463959e-243,1.4447268620911757e-89],0,0],[[1.0420632008764305e-255,-6.647381994040776e+28,7.492863265092149e+193],0,60.56975525027214],[[-2.22550224200597e-215,-4.4202281498453134e-210,-2.7561614443533105e+307],0,53.47169079070351],[[2.1023881259435715e-142,1.2286041871551853e+305,-7.250968489147593e+121],0,61.27436649836295],[[6.890711381796581e-252,-7.546945266760574e-90,-2.69825319383642e-133],0,0],[[1.677162052730813e-59,8.686388033007487e-215,-1.3149636586628956e+118],0,61.303087464099775],[[-6.201577640216828e-76,-2.9590397071500346e+28,-4.926806733013528e-158],0,0],[[-5.170525455803253e+144,3.4859445720092225e-35,4.821982933878669e+175],0,0],[[-1.1185816621821212e-94,4.344638216165875e-288,-1.7812260516570316e-155],0,0],[[1.187362624897409e+112,-3.4014587503013307e-66,-5.491335421336957e+149],0,1.0],[[6.919932177490866,-3.539516667629656e+281,-1.127329219926809e-187],0,0],[[-1.1349630928255783e-207,-1.1559445604370315e+288,-3.57999533002613e+292],0,57.706151226316194],[[1.1966617966615715e+32,-1.308443002203369e+86,-6.664362743500172e-29],0,0],[[6.432750463800895e+170,-1.1888721424009163e-144,-1.7040442460095513e-75],0,0],[[-4.744869685397997e-163,1.1038900376070258e-272,1.1135903314955052e+244],0,59.73720740931781],[[8.192710157560433e-306,2.5216713222419557e+200,2.7861975952274327e-251],0,0],[[-2.265074770534004e+131,7.839670149925818e-278,-1.735573807040294e+70],0,0],[[-3.286716298820313e-41,-3.0870693428253524e+115,-1.6615507340775114e+268],0,59.05521258753139],[[-3.6366540230121064e+282,-4.5628330785036e-235,3.412298361507663e+104],0,0],[[3.4304207896824764e+78,-1.5862298780284405e+234,-3.5257614939229864e+45],0,1.0],[[1.1418903566588686e+202,3.057923656733621e+257,1.9635189108773308e+208],0,1.0],[[9.104095698506237e+247,-1.395378566558569e-155,-1.008849602168032e-147],0,0],[[1.5309364148291473e+20,3.009607083325416e-208,4.696040142948554e+202],0,60.45451216541414],[[-1.4929980720652086e+294,1.672328230858498e-214,-7.579010248497065e+83],0,0],[[3.603857068482743e+158,2.9731168912425227e+223,5.5230827984860495e-214],0,1.0],[[1.2569177198304213e+35,-1.396741088899253e-104,-1.2533180509137805e-282],0,0],[[0.056030027328489294,-1.6941667724887288e+108,1.3453300471233885e+129],0,0],[[8.548941388682517e-48,2.8670290078668156e+257,9.339975929055322e+155],0,60.98274136957115],[[-5.333959628058546e-35,-1.37284104484469e-193,9.19691126799929e+93],0,0],[[-2.7507146943094008e-114,-4.541303516304554e-153,2.6063194423749796e+134],0,61.17384117792451],[[-7.49044213263508e+291,-1.3788096112971466e-169,2.068929278551331e+156],0,0],[[-2.6265804345369346e+191,1.9899626460259247e-13,-9.596430455745706e+100],0,0],[[5.3364583166991444e+300,-3.088836913113676e+107,-4.497723396184308e+249],0,1.0],[[-2.0013485306413847e-258,3.307434389659611e+110,-80722015057.35544],0,61.948112167540074],[[5.0305259690686196e-231,1.1795612077485763e+52,-7.81439769323426e-309],0,0],[[4.1188846940311216e-171,1.1856484764854597e+269,-1.3692306833325666e-157],0,0],[[1.2500602811876808e+40,2.953363332574606e-238,-4.612923893847788e+233],0,59.95326148053716],[[1.6986948886824323e+126,2.0155846495512064e+173,-7.577132280246575e+93],0,0],[[-6.227793500436146e+292,1.0729156452384357e-137,-2.1995102488491374e+92],0,0],[[1.051973877170815e-298,-2.35103610402023e+214,-1.762241542725527e+256],0,59.43317937302809],[[-3.1275696969283374e-124,1.8331795202945072e-122,7.707961271807703e-168],0,0],[[4.142690958783731e-85,2.3636227077055366e+106,-1.2013940617586167e+160],0,60.94336737312885],[[1.170023224533326e-179,-2.647095342829477e-193,-7.384894716657131e+275],0,58.75043075221173],[[1.4462182673219785e-257,6.1701670079874715e-148,-3.4096344247463026e+169],0,60.84821815160063],[[-1.3672693428204055e+119,3.515536684928011e+206,-9.852495186821838e-109],0,0],[[9.581945296609061e+205,-8.171851610632133e-29,3.9211741729059833e+93],0,0],[[-7.207768437261981e+41,1.8636896603361692e+300,2.703480388506777e-207],0,0],[[6.763159401082614e-231,5.60029751695527e-74,-3.996639231722599e-250],0,0],[[-1.660792857124932e-193,1.0163117083670472e-178,1.2848677963582702e+197],0,60.52857576061055],[[3.716620345265454e+191,1.2808656209351454e-308,-8.261513904855362e+50],0,0],[[4.079715673979633e+117,-2.897784303481398e+193,-1.7680917188681742],0,0],[[-5.893156054960838e-209,-1.2838742763593962e-306,3.2540486993164457e+100],0,61.4307459360689],[[-1.3215125919708138e-66,-1.1348077011704342e-165,1.415228692978329e+55],0,0],[[2.8299772476719073e-248,-1.5516908711200715e+114,-1.5546063348868015e+175],0,60.788019299475785],[[-7.91477975257425e-178,1.0120915835571524e+263,2.9738216870275134e+189],0,60.62448515013275],[[1.534294812232018e+296,3.6432528648228024e-99,-1.078537986809811e+95],0,0],[[-5.971284384303698e-181,-1.165108214722553e+183,-3.131868129995754e-179],0,0],[[-4.893796482840715e-96,2.3933397594674356e+274,-1.065087959176633e-15],0,0]],"picked":"(λ (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)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 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)
* [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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) 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 (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1))
* [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 (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* 1 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1))) into (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1))
* [misc]backup-simplify:  Simplify (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1))) into (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (- (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))) into (- (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 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 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1) in U
* [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]taylor:  Taking taylor expansion of 1 in U
* [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/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 (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [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]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]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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (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 (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))) 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 (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (- (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) (* 1 (* 1 J))) into (* -2 (* J (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* [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 (+ (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 (- (+ (* 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 (+ (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]backup-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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 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 (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (* -2 (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log J) (log (/ 1/2 (* U (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 J) (log (/ 1/2 (* U (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 (* 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 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* U (cos (/ 1/2 K))) into (* U (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (* U (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* U (cos (/ 1/2 K))))) into (log (/ 1/2 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))) into (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) into (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* U (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* U (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 (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) into 0
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) (cos (/ 1/2 K))) into (* (cos (/ 1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))) in U
* [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]taylor:  Taking taylor expansion of (log (/ 1/2 (* U (cos (/ 1/2 K))))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* U (cos (/ 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 (* U (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]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 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 0) (* 1 (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]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 J) (- (log (/ 1/2 (cos (/ 1/2 K)))) (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 U
* [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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 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 (+ (* 0 0) (+ (* 1 0) (* 0 (cos (/ 1/2 K))))) 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 (/ 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 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K)))) into (* -2 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* -2 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K)))) into (* -2 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 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 (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (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 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) (+ (* (/ (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 J) (log (/ 1/2 (* U (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 (- (+ (* (/ 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 (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow J 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow J 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* U (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* U (cos (/ 1/2 K))))) (* 0 (/ 0 (* U (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 (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) (+ (* (/ (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 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 (/ 1 K))))) (log (/ 1 J))) (log (/ 1 U))))) 1)) (cos (/ 1/2 (/ 1 K))))) (* 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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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]taylor:  Taking 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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (* 2 (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log J) (log (/ 1/2 (* U (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 J) (log (/ 1/2 (* U (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 (* 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 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* U (cos (/ -1/2 K))) into (* U (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (* U (cos (/ -1/2 K)))) into (/ 1/2 (* U (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* U (cos (/ -1/2 K))))) into (log (/ 1/2 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))) into (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* U (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ -1/2 K)))) (/ 0 (* U (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 (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) (cos (/ -1/2 K))) into (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))) in U
* [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]taylor:  Taking taylor expansion of (log (/ 1/2 (* U (cos (/ -1/2 K))))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* U (cos (/ -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 (* U (cos (/ -1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]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 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 0) (* 1 (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]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 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 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 (* 1 0) 1)) (pow J 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 (+ (* 0 0) (+ (* 1 0) (* 0 (cos (/ -1/2 K))))) 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 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 (- 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (- 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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) (+ (* (/ (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 (* U (cos (/ -1/2 K)))))))) 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 (- 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow J 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow J 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* U (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ -1/2 K)))) (/ 0 (* U (cos (/ -1/2 K))))) (* 0 (/ 0 (* U (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 (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) (+ (* (/ (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 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1))))
* * * * [misc]progress:  [ 2 / 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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (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 (+ 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 (/ (+ (* -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 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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 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 (+ (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 (- (+ (* 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 (+ (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]backup-simplify:  Simplify 0 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 (+ (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 (- (+ (* 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 (+ (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 (- (+ (* 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 (+ (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]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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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]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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ 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 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 J
* [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 (+ 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 (- 0) into 0
* [misc]backup-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 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 (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1))
* * * * [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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (+ 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 (/ (+ (* -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 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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 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 (- (+ (* 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 (/ 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 (- (+ (* 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 (/ 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]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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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]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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 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 (- 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 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 (- 0) into 0
* [misc]backup-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 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/2 (cos (* 1/2 K)))) (log (/ -1 J))) (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) (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 (393 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 2 / 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 (393 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 3 / 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:  [ 4 / 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 (154 enodes)
* * [misc]simplify:  iters left: 2 (399 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (+ (log (cos (/ K 2))) (log (* J -2))))
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (+ (log (cos (/ K 2))) (log (* J -2))))
* * * * [misc]progress:  [ 5 / 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 (153 enodes)
* * [misc]simplify:  iters left: 2 (403 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (log (* (cos (/ K 2)) (* J -2))))
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (log (* (cos (/ K 2)) (* J -2))))
* * * * [misc]progress:  [ 6 / 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 (482 enodes)
* [exit]simplify:  Simplified to (log (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 7 / 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 (402 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:  [ 8 / 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 (* (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (+ (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3))) (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3))))))
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (+ (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3))) (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3))))))
* * * * [misc]progress:  [ 9 / 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 (* (+ (pow (* (cos (/ K 2)) (* J -2)) 3) (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (pow (* (cos (/ K 2)) (* J -2)) 3))) (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (+ (pow (* (cos (/ K 2)) (* J -2)) 3) (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (pow (* (cos (/ K 2)) (* J -2)) 3))) (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 10 / 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 (157 enodes)
* * [misc]simplify:  iters left: 2 (393 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (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 (157 enodes)
* * [misc]simplify:  iters left: 2 (393 enodes)
* [exit]simplify:  Simplified to (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 11 / 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 (435 enodes)
* [exit]simplify:  Simplified to (* (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (pow (* (cos (/ K 2)) (* J -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 (* (cos (/ K 2)) (* J -2)) 3)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 12 / 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 (157 enodes)
* * [misc]simplify:  iters left: 2 (393 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (* (* (cos (/ K 2)) (* J -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 (157 enodes)
* * [misc]simplify:  iters left: 2 (393 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 13 / 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:  [ 14 / 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 (206 enodes)
* * [misc]simplify:  iters left: 2 (483 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (* (cos (/ K 2)) (* J -2)) (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))) (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 15 / 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 (161 enodes)
* * [misc]simplify:  iters left: 2 (394 enodes)
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* J -2)))
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* J -2)))
* * * * [misc]progress:  [ 16 / 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 (157 enodes)
* * [misc]simplify:  iters left: 2 (392 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (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) (* (* (* (* -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 (68 enodes)
* * [misc]simplify:  iters left: 2 (82 enodes)
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (* (sqrt 1) (* J -2)))
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (* (sqrt 1) (* J -2)))
* * * * [misc]progress:  [ 18 / 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 (157 enodes)
* * [misc]simplify:  iters left: 2 (392 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 19 / 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 (52 enodes)
* * [misc]simplify:  iters left: 2 (57 enodes)
* [exit]simplify:  Simplified to (* (* J -2) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (* J -2) (cos (/ K 2)))
* * * * [misc]progress:  [ 20 / 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 (323 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (cos (/ K 2)))
* * * * [misc]progress:  [ 21 / 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 (255 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))
* * * * [misc]progress:  [ 22 / 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 (246 enodes)
* [exit]simplify:  Simplified to (* (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))) (* (cos (/ K 2)) (* J -2)))
* [exit]simplify:  Simplified to (* (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))) (* (cos (/ K 2)) (* J -2)))
* * * * [misc]progress:  [ 23 / 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:  [ 24 / 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:  [ 25 / 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:  [ 26 / 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (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) (* (* (* -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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [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 (* (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 29 / 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 (135 enodes)
* [exit]simplify:  Simplified to (* (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1) (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)))) 1) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 30 / 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 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 31 / 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 32 / 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 (326 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:  [ 33 / 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 (214 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3))))
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ 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 (333 enodes)
* [exit]simplify:  Simplified to (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 (- (pow (/ (/ U (* J 2)) (cos (/ K 2))) (+ 3 1)) (- (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 34 / 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 (190 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* J 2)) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* J 2)) (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 (482 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 35 / 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 36 / 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:  [ 37 / 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:  [ 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 (70 enodes)
* * [misc]simplify:  iters left: 2 (135 enodes)
* * [misc]simplify:  iters left: 1 (297 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 (70 enodes)
* * [misc]simplify:  iters left: 2 (135 enodes)
* * [misc]simplify:  iters left: 1 (297 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 (37 enodes)
* * [misc]simplify:  iters left: 2 (40 enodes)
* * [misc]simplify:  iters left: 1 (59 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))))
* [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 (316 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 (302 enodes)
* [exit]simplify:  Simplified to (* (/ (/ (/ 1 2) J) (cos (/ K 2))) (/ (/ (/ 1 2) J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (/ (/ (/ 1 2) J) (cos (/ K 2))) (/ (/ (/ 1 2) J) (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 (144 enodes)
* [exit]simplify:  Simplified to (* (log (/ (/ (/ U 2) J) (cos (/ K 2)))) 2)
* [exit]simplify:  Simplified to (* (log (/ (/ (/ U 2) J) (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 (322 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 (322 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 (196 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 (98 enodes)
* * [misc]simplify:  iters left: 2 (322 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 (98 enodes)
* * [misc]simplify:  iters left: 2 (322 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 (19 enodes)
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (* J 2))
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (* J 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 (43 enodes)
* [exit]simplify:  Simplified to (log (* (cos (/ K 2)) (* J 2)))
* [exit]simplify:  Simplified to (log (* (cos (/ K 2)) (* J 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 (43 enodes)
* * [misc]simplify:  iters left: 1 (49 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 (242 enodes)
* [exit]simplify:  Simplified to (* (* (pow (* J 2) 3) (cos (/ K 2))) (* (cos (/ K 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (* (pow (* J 2) 3) (cos (/ K 2))) (* (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 (21 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (cos (/ K 2)) (* J 2))) (cbrt (* (cos (/ K 2)) (* J 2))))
* [exit]simplify:  Simplified to (* (cbrt (* (cos (/ K 2)) (* J 2))) (cbrt (* (cos (/ K 2)) (* J 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 (* (cos (/ K 2)) (* J 2)))
* [exit]simplify:  Simplified to (cbrt (* (cos (/ K 2)) (* J 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 (171 enodes)
* [exit]simplify:  Simplified to (pow (* (cos (/ K 2)) (* J 2)) 3)
* [exit]simplify:  Simplified to (pow (* (cos (/ K 2)) (* J 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 (* (cos (/ K 2)) (* J 2)))
* [exit]simplify:  Simplified to (sqrt (* (cos (/ K 2)) (* J 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 (* (cos (/ K 2)) (* J 2)))
* [exit]simplify:  Simplified to (sqrt (* (cos (/ K 2)) (* J 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 (* (* (cbrt (cos (/ K 2))) J) (* (cbrt (cos (/ K 2))) 2))
* [exit]simplify:  Simplified to (* (* (cbrt (cos (/ K 2))) J) (* (cbrt (cos (/ K 2))) 2))
* * * * [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 (* (sqrt (cos (/ K 2))) (* J 2))
* [exit]simplify:  Simplified to (* (sqrt (cos (/ K 2))) (* J 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 (18 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 (* (cos (/ K 2)) J)
* [exit]simplify:  Simplified to (* (cos (/ K 2)) J)
* * * * [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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))))>
* [enter]simplify:  Simplifying (* -2 (* J (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* * [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 (* (* J -2) (sqrt (+ 1 (* (* 1/2 (/ U J)) (* 1/2 (/ U J))))))
* * * * [misc]progress:  [ 69 / 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 (337 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (* K 1/2))) (sqrt (+ 1 (* (* (/ 1/2 (cos (* K 1/2))) (* (/ 1 J) U)) (* (/ 1/2 (cos (* K 1/2))) (* (/ 1 J) U))))))
* * * * [misc]progress:  [ 70 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)))))>
* [enter]simplify:  Simplifying (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (115 enodes)
* * [misc]simplify:  iters left: 3 (332 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (* (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* K 1/2)))) (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* K 1/2))))))) (* (cos (* K 1/2)) (* J -2)))
* * * * [misc]progress:  [ 71 / 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 (166 enodes)
* * [misc]simplify:  iters left: 2 (280 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (* U (/ 1/2 J)) (* U (/ 1/2 J))) 1)) (* (cos (/ K 2)) (* J -2)))
* * * * [misc]progress:  [ 72 / 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 (339 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (* (/ 1/2 (cos (* K 1/2))) (* U (/ 1 J))) (* (/ 1/2 (cos (* K 1/2))) (* U (/ 1 J)))) 1)))
* * * * [misc]progress:  [ 73 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)))
* * [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 (* (* (cos (/ K 2)) (* 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:  [ 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 (166 enodes)
* * [misc]simplify:  iters left: 2 (280 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (/ U (/ J 1/2)) (/ U (/ J 1/2))) 1)) (* (cos (/ K 2)) (* J -2)))
* * * * [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 (339 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (* (/ 1/2 (cos (* K 1/2))) (* U (/ 1 J))) (* (/ 1/2 (cos (* K 1/2))) (* U (/ 1 J)))) 1)))
* * * * [misc]progress:  [ 76 / 79 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (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 (* (* (cos (/ K 2)) (* 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:  [ 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 (110 enodes)
* * [misc]simplify:  iters left: 2 (184 enodes)
* * [misc]simplify:  iters left: 1 (261 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ 1 (* (/ U (* 2 J)) (/ U (* 2 J))))))
* * * * [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 (166 enodes)
* * [misc]simplify:  iters left: 2 (405 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (/ (/ (* (/ U 2) (/ U 2)) (cos (* 1/2 K))) (* (* J J) (cos (* 1/2 K)))) 1)))
* * * * [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 (166 enodes)
* * [misc]simplify:  iters left: 2 (405 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (/ (/ (* (/ U 2) (/ U 2)) (cos (* 1/2 K))) (* (* J J) (cos (* 1/2 K)))) 1)))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 2 / 4
* * * [misc]progress:  picking best candidate
"ALT DATA: "{"all-alts":["#<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) (* (* (* -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)))))))>","#<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) (* (* (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))) (* (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))))))>","#<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)))))))>"],"best-fresh-alt-per-point":[[[-7.097835734746746e+218,1.6219172946297815e+205,-5.707405484951641e+252],0,0],[[2.5842129352573833e+157,2.03476018732095e+119,2.3993845233584173e-107],0,1.0],[[-1.3908305214282044e-154,-2.4923117032686953e+197,-3.7981733760926524e-59],0,0],[[6.8367221822693645e+171,-2.485557599167403e+61,3.637969744290734e+272],0,0],[[3.6070289902878433e-298,2.4220868488775713e+174,-6.924414872876826e+121],0,61.27455062667296],[[-8.127295724709651e+188,1.4680641340515712e+37,2.130535351053153e+251],1,0],[[-6.59522455933465e-44,9.732025433837372e-298,4.3186153363237085e+196],0,60.534670692689666],[[4.717376995390811e-229,-2.3341562724578147e+138,-1.7808212315293658e-267],0,0],[[7.890896542811938e+189,-1.260155462227717e+139,-4.3402484094339546e-98],0,1.0],[[-2.1518590613428118e+57,-3.8472878924535176e-69,1.921602658997656e+224],0,60.12392332543967],[[-1.0752803839894087e-102,-2.4043032639901138e-220,7.317333208039203e-135],0,0],[[-3.5874867218821053e-289,6.639161457381533e+272,7.51766164914667e-83],0,62.340805957937846],[[1.2494134226790036e-90,5.2370439997769816e-251,-1.3732814838912222e+218],0,60.226141843328364],[[-147062523.161634,2.29835853317011e+39,3.8297412694520027e-72],0,0],[[-6.728931476030476e-220,-3.8960057277485095e+62,9.751429336071956e-111],1,0],[[3.4632829335752192e-251,-5.571648378152749e-24,-1.5013788162994641e-139],1,0],[[-2.647005178779469e+185,1.8598894186132259e+137,-3.3947387264781975e-158],0,0],[[2.9019277223709396e-286,-5.0486763504289305e+297,-2.2447560163594899e+161],0,60.93074969374858],[[5.463725192370479e+166,-3.3667834592100016e+22,-2.536436058187021e+276],4,0],[[1.2810755089251013e+75,9.138814505421974e-66,2.6556986431700894e-172],0,0],[[-2.8093867946453197,3.515792627928699e+199,9.597291263463799e+33],1,1.0],[[1.8150897130550793e+234,3.165542051316829e+57,1.579252672267158e+84],0,1.0],[[-7.8825607621194955e+93,1.1209809220161085e-271,-4.5883837368201683e+216],1,1.0],[[-3.255819812723566e-280,2.34479875841816e+59,5.702786507831075e+76],0,61.586896051932605],[[-1.7985967492432066e-181,-2.29441662020671e+209,-2.7064948575317953e+102],0,61.41741290190064],[[-5.456612900256313e-153,-1.6440819958925954e-123,8.045725952292009e+27],0,61.863218624207455],[[-3.267629569827715e-251,-8.654617709875635e-36,-5.243244850188282e+70],0,61.624065708565425],[[-1.2177356660474435e-254,7.810899588463585e-172,9.291488452698296e+167],0,60.86428026193053],[[-7.50461175805814e-258,-2.2074245476722926e-139,3.7649062113016876e-174],1,1.0],[[-2.831440759739633e+280,3.247555001847955e-09,-3.0357084245012946e-130],0,0],[[-6.590241440058156e+158,-3.600398183547405e+279,9.099484178294087e-276],0,0],[[-1.236864784914523e+307,-2.3539834087406223e+176,-1.1399021272637037e+283],0,0],[[1.2224178423718919e+201,-8.576640958071904e-118,-1.945904698138074e+294],0,1.0],[[-3.685865083311364e-22,3.264541092685341e+28,9.725416649719138e+252],0,59.520999571980504],[[-7.779967944948024e+102,-1.2524242674835265e-178,6.950896233858705e-22],0,0],[[-4.076760961819094e-307,-9.77225532658453e-187,4.4532169971988716e-248],0,0],[[-5.323110058228719e+306,1.1685596793963991e+198,-2.6353579322600854e+190],0,0],[[-1.9050852423101186e+177,3.272100701705269e+216,7.435874100938545e+127],0,0],[[1.7367008233662004e-146,3.241242127032787e+189,-1.8989429074771432e-61],1,0],[[-1.196163833446424e-216,-2.482218997015813e-79,-4.8603401847979466e+293],0,57.59925762427263],[[-7.885752610457983e-237,-1.8011585194123284e+244,1.710179159392655e-230],2,0],[[-4.865962690031574e-57,-9.009421056215597e-142,-5.6291122105439806e+206],0,60.3976604012631],[[-2.0273370129970457e+293,-3.089328922376561e+38,1.7761334469972786e+272],0,0],[[-6.458816293530837e+32,1.2314425699492343e+144,-4.391490797054204e-127],0,0],[[-1.3671559872942241e+32,1.7931450786375e+207,6.7889504343027e+141],1,0],[[3.717688415206528e-63,4.2329024975964494e-120,1.5110472870035968e-137],0,0],[[-3.071247325847018e+168,1.6394729264619353e-305,-2.427270407266838e-292],0,0],[[-2.2380108691988367e+176,-2.2804753660027636e-184,-417.84894784071446],0,0],[[1.273007442525311e+205,-860404.0745975035,9.790032000289722e-170],2,0],[[1.748601585802626e+143,-2.7501066713881833e-45,6.1586742802359446e+280],1,0],[[-7.693537982561176e+228,1.4196179692273589e+51,-1.816962027309807e-87],0,1.0],[[2.0434027565243845e+254,15210.1761529531,-2.7933732390832485e+50],0,1.0],[[-7.045510436190759e+250,3.865070822820752e-125,4.405711435557941e-18],0,0],[[6.86860201817031e+37,-3.6003931204734074e+177,2.9793076670648235e+135],2,0],[[-1.0747586880572918e-225,-3.914306845273933e+191,3.4461982003189476e-271],0,0],[[4.994366090310223e+293,2.9675638609500463e-266,8.497595544438243e+196],0,0],[[-2.4291085511930378e-57,3.7184381896827443e-109,9.342278142177427e-261],0,0],[[-1.9641025336330274e-36,1.5030419663802974e-174,-3.0809655420404695e-28],0,0],[[-2.439062442778655e-102,0.18720893918478226,-3.4986244195491495e-274],0,0],[[8.713457448965708e+55,1.3423233293291483e-162,1.7094985902294833e-299],0,0],[[-4.806258092707348e+97,-3.1666396733025884e-13,6.443766269775323e+116],1,0],[[-2.4346037043150295e+140,1.2878875837081438e-81,-1.2369049141682215e-238],0,0],[[-1.7508318798883553e+27,-1.626718674009136e+164,-2.303287936653167e+103],0,0],[[3.802507995980374e-176,-4.3021363265330954e+273,1.2952736416079913e-172],1,0],[[-1.654438597637836e+210,-4.5087835058803264e-119,-4.76358476622384e-40],0,0],[[-4.4587503598222035e-69,2.220662619570457e+252,-3.220071167646315e+167],0,60.869238566188756],[[-1.894259608196097e+90,3.61050150366864e+208,-4.4100791718387096e+222],0,0],[[9.426838129136436e+163,-2.3181506163130386e+81,4.678580995434083e-146],0,0],[[2.6773769570729964e-91,-3.685146484696044e-133,-6.601969142405229e+46],1,1.0],[[-2.267428170639853e+292,1.0258897434193047e+31,3.867922064222235e-78],0,0],[[6.811775981980025e+18,1.4782394318457476e-109,-5.609454405888344e-131],0,0],[[-1.9166323121487114e-233,-8.914664962649548e-28,6.125036550218122e+186],0,60.65675482516793],[[2.738458460650558e+50,1.2054688632397534e+33,-5.575910688006958e+201],0,1.0],[[-1.7060173400540982e-279,1.692419472494387e-152,-8.508186045528442e-232],4,0],[[3.496596375732988e-212,-1.7601344029867343e-290,-2.7467829813272228e+287],0,58.11261916665845],[[7.5963065745174464e-06,1.6348045764158446e-257,-4.607089829824939e-06],3,0],[[4.821955799677156e-289,-2.3184172477948065e+196,1.7483065599934842e+85],0,61.53308646175488],[[-1.0057412795601501e-141,0.060556571647326925,1.8480052807692756e-77],1,0],[[8.452451609890028e+85,3.450903835999846e-213,4.495110039324184e-82],0,0],[[-1.3252476549554923e-172,-1.2400400292246446e+273,-2.099587820327233e-176],1,0],[[-1.753002269819775e+157,2.229461735274287e-223,-5.461310186136003e+131],0,0],[[-1.265259404413343e-89,-1.0963427561332458e-156,5.741222418922647e-41],0,0],[[7.0181404927126106e+305,-1.1560520854064811e-178,3.6484688752466967e-69],0,0],[[-3.312607218501177e+276,5.094611782176626e-183,-3.6242962787554164e+165],0,0],[[-1.0064448966798171e+198,-4.253682617948995e-243,-1.6600604267765295e-45],0,0],[[-1.2261367936338352e-64,9.383817895669287e-283,3.611278323934413e-94],0,0],[[1.6564415223201099e+136,-6.991593686636276e+190,-6.602809642561733e-223],0,0],[[-4.485222205559527e+248,1.4448618247603424e-257,3.706054342154294e-129],0,0],[[7.195448856340728e-141,3384824.3314616154,-4.510161549039838e-214],2,0],[[-9.543517271590036e+203,2.6544319953421338e+293,1.1509772202461854e+130],0,0],[[7.876423561266471e+22,-5.7183056168804695e+262,2.809919074811328e-300],4,0],[[2.1859104172563636e-264,-1.6313740517107182e-227,-7.512222795104406e-168],1,0],[[-82504272040715.1,9.260475542482052e+299,-2.191896168863437e-98],4,0],[[-1.9194647450105577e+144,-5.02014609669523e+254,-3.3925149777052834e-63],0,0],[[8.359355849775862e-16,1.3310146389530143e+163,-1.3274409717698955e-301],0,0],[[-7.543647802930883e-65,4.6811315760090616e-144,2.043780925156358e+88],0,0],[[-1.3285899852668203e+268,-2.1307490533826745e+196,-2.6253419032181803e+196],0,0],[[1.046624167704608e-163,3.4631943627882644e+200,-1.3964572346787755e-152],3,0],[[-7.807986006964459e-172,4.648142651511719e+239,-4.519595929536516e-229],0,0],[[-1.3448163575524206e-16,-1.423542426143039e-129,-2.969699723262003e+31],0,0],[[5.903833024524204e-224,-5.866052212830613e+219,-2.0449888976508749e+136],0,61.157957079708986],[[6.75061600976492e-09,-6.990575505691825e-293,-2.097700040267997e+32],0,0],[[-1.0183335489303076e-199,-2.2046896841875876e+105,4.0526523047213233e+244],0,59.72462417842582],[[-4.630105582658964e+112,1.5043274345617834e+228,-231.6086328505263],0,0],[[-16083688965753228.0,-2.915269426177489e-188,-1.1146873205045003e+50],4,0],[[9.861253466270416e+140,6.509917256919526e-155,-1.235130140170164e-126],0,0],[[2.0740305822111617e-302,2.156659933698441e+65,-7.1479705794644704e+252],0,59.5239545806469],[[-3.7138781240413885e-204,-7.263550849085613e-27,5.582278109308679e-72],1,0],[[-9.324073911343234e-97,1.329109205730971e+18,2.480190476546545e-246],0,0],[[7.542398567020551e-205,3.211003609332114e-292,-2.9988557709871706e-297],0,0],[[-3.841622556722524e-66,4.607613593823294e-213,1.705817703400908e+63],1,0],[[-1.1204577574966285e-246,-4.921050894675189e-140,2.0974429565133816e-215],1,0],[[-8.048358363486665e+120,8.530068169212586e+207,2.905639146095198e+214],1,1.0],[[-9.958023069471933e+213,3.554023312793441e+160,1.51646550817889e-257],2,0],[[-0.0007363022252445651,-1.7841118844999841e+249,9.88160538195634e+236],0,59.88743993573152],[[-5.624997011130711e-126,2.3719183352628996e+212,-1.9742436392168267e+216],0,60.255350889881406],[[-1.0155994341356255e+111,1.1988791635038015e-56,-171.37335414723813],0,0],[[-1.7491621663626818e+238,-4.226402616530443e+259,3.50550012204851e-33],0,0],[[-7.497175243828372e+204,1.708686197016133e+79,-3.1472164561505567e-59],0,0],[[-8.05737758242569e-91,1.0057242501199301e-254,-3.222264666704597e-210],0,0],[[1.099315532911349e-23,-2.4132101870415246e+120,-7.586221492885147e-139],0,0],[[-358605196789223.75,1.4540832115601766e+80,-4.5561147022013495e+203],0,60.441063559764686],[[3.224104279734413e-128,3.8655618297451507e+264,-6.394924897500658e-104],1,0],[[-4.266935350404457e+257,-4.095681815309281e+187,6.029252458259788e+248],0,1.0],[[-1.3489282606511781e-35,2.45682697544046e-235,-1.7051167618207031e+156],0,60.98017647400547],[[-3.448018665551091e+46,4.65318267035879e+212,1.7198556401156944e+40],0,0],[[-2.868627256931542e+282,-2.532452753214596e+217,-1.0726845205664223e-63],0,0],[[-3.2017078238224426e+292,-7.4224082205270185e+121,5.394314721089183e-302],0,0],[[-3.023055730501428e-23,-1.175878359064847e-77,-3.9529958064865946e-264],0,0],[[3.6553350706241625e-209,5.073224629669749e-209,-1.2641746276125557e-259],0,0],[[-6.168869222825437e-92,-4.977701482488331e-274,2.2777945340735493e-276],0,0],[[-3.5687398900842987e+52,-8.51976038766166e+293,1.0871440614151498e+289],0,57.997392776194935],[[-1.4372534866880888e+234,4.876905254991102e+285,1.2894750780678564e+300],1,0],[[-1.6235425325048555e+261,1.4618355052890434e+227,3.043685036732137e-200],0,1.0],[[1.4920285944075702e-53,-1.738586776813829e-222,7.628653541085044e+123],0,61.258701434077615],[[4.493452818771822e-125,-1.980605354536306e-231,1.4342996382753786e-68],1,1.0],[[1.0963301159009184e-183,3.231394614843413e+95,-5.8891022224162905e+299],0,56.81973218624375],[[-171636426038343.06,8.895467702359268e-17,-9.062606466177737e-237],0,0],[[-4.005659624811191e+200,-18632706462072732.0,-4.1068770028392473e+21],0,0],[[-1.3688696209191408e-102,-2.0036982767287855e-282,7.084339583278926e+216],0,60.24657717169728],[[3.879381526714617e+231,-4.612024538520277e+39,1.1166277726761266e+39],0,0],[[-1.7089084754270419e-12,-1.469508077318514e+98,1.8687286825225081e+205],0,60.41843201467783],[[-9.164501627196514e-190,-5.450210145640886e-309,-2.8266439589935105e+168],0,60.859541086901274],[[2.8321391439452527e-177,1.0865881933967427e-239,1.0321884324238089e-204],0,0],[[-6.605881759005181e+183,2.194953362823915e+177,-4.99895221232182e+182],0,0],[[1.3687884379108643e+17,3.468363920687483e-275,9.235058182301351e-298],0,0],[[-1.0915024824878794e+32,1.3508330812519037e-42,-7.643304163425191e-132],0,0],[[3.258549790458107e-45,2.1316535898912934e-76,-5.329618293165233e+254],0,59.474631968114856],[[2.2420303907903802e-68,-4.147815060644267e-269,-1.5885079051767335e-90],0,0],[[-3.969894456140893e-15,-1.317053669789009e+53,5.776745162887772e-81],0,0],[[2.3939618552975763e+242,-4.127632732628039e+21,3.161587187966589e+82],0,0],[[3.2633957345317127e+251,2.0474783165414538e-126,-1.8675181824308287e+123],0,0],[[5.5609724703152094e-123,-9.698832524909335e+106,4.871284163370267e-185],0,0],[[1.9117791443554203e-134,-1.1788306068444453e-175,-7.2672182309421e-153],0,0],[[788647938.445347,-5.600514306056783e-289,-3.4507996665333636e-44],0,0],[[7.4751406322111975e-208,7.348751680152543e-306,5.656765710936691e-76],0,0],[[1.961831527193424e-60,-1.0262805742626176e-88,7.655606647706524e-307],0,0],[[-3.4535699470035837e-158,1.027405627074826e+260,-1.0089466879026102e-120],1,0],[[-8.150217400699526e-187,-1.081567422425548e+106,-7.328272485377685e-51],1,0],[[-5.600850699676017e-216,-4.569457869050411e-204,3.981491076325477e+229],0,60.02988735115003],[[-5.201902814304858e+287,-8.370936497660456e+147,1.6703871447091801e-184],0,0],[[3.294798454877577e-109,-1.1634672830494242e+297,5.873882793788073e+304],0,55.54370003871646],[[-2.5842611121723686e-83,1.9827401749271262e+183,2.468160393597418e+16],1,0],[[-4.3156972913392805e-297,2.339761031458555e-169,3.943485742551043e+214],0,60.28155775404954],[[8.23935440322281e-255,-6.993566496172953e-149,1.2414218620136766e+210],0,60.34922351850937],[[-1.8008197600788473e-210,-9.339382943714191e+219,-1.9724572392550013e+269],0,59.01688122601553],[[4.2958727261014584e+36,6.328184874755262e+301,1.7255846811749406e-291],0,1.0],[[-2.8873539429251243e+113,9.723806270790304e+261,3.669186107808967e-292],0,0],[[1.4160598314001593e+222,7.17939675829627e-158,5.706174991628051e-294],0,0],[[-8.833333360285963e+123,1.6543220134558954e+211,-2.0075913201092103e-110],0,0],[[-5.799494962865382e+179,-1.9221933359897497e-164,-4.223847889069915e-247],0,0],[[-7.412818439865646e+79,-1.1943364123385422e-44,-2.891150086994789e-239],0,0],[[7.759258852634933e-78,20833.64667003459,2.4398615081868066e+205],0,60.41694135189651],[[-1.242717444963877e+43,2.3948670500504287e-261,6.2092037474963055e+231],0,59.98868627570155],[[2.3255349808732236e+289,-1.1280084353956664e-216,-8.464143987770504e+171],0,0],[[-2.0051342910565085e+265,6.413626161349299e-227,560488966.1174189],0,0],[[2.0882744776400718e-286,-1.930574277247469e-202,1.751208589172235e-52],0,62.22394337671404],[[2.9688880181416084,-2.3040207927157378e-96,-6.579373556970536e-52],0,0],[[-4.194881103238641e+21,9.475383647572687e+150,-4.825887791830381e+144],4,0],[[1.5628986347380075e+167,8.340556674905215e+77,-3.6999440436536584e-49],0,0],[[7.077452111412406e-295,3.966194599780254e-223,3.7838902349270595e+124],0,61.25316496124588],[[4.700763524863875e+204,-2.9207329416306686e+217,1.3073288890631414e+280],3,0],[[-7.693815148540151e+114,3.2964836323184035e-155,-5.3525540351311954e-281],0,0],[[8.40015631920143e-267,5.7735379314244544e+135,-2.6804016066367006e-31],0,62.136530907271094],[[1.3086604894940812e-227,5.110728256051039e-260,-2.2230057586741136e-141],1,1.0],[[5.996749315117597e+34,-2.0470315990098174e-13,-3.551599710870501e-79],0,0],[[-1.3512698516924462e+222,4.5201803639304495e+192,3.8910566195656857e-199],0,1.0],[[-3.0811702649623344e-274,2.3443867491657545e+246,-6.131456919104946e-248],1,1.0],[[-8.64483328785185e-272,2.6015556795165393e-281,3.569525897033803e-203],1,1.0],[[-3.696014574690946e+253,-6.234818190089148e-22,1.0433422764871603e+92],0,0],[[2.911945305258545e+76,1.607081485572248e+287,3.0951906535851436e+156],0,0],[[-2.304902569428671e-278,4.842080607450392e+183,-1.3710886835561032e-37],0,62.16307349980139],[[-3.0626399470140506e+19,1.9567613186327648e-98,1.3180753941144182e-147],0,0],[[-7.302755623144034e-92,2.034142710886352e+76,2.645632745156305e+72],0,61.61379429787259],[[-1.64305460819134e+147,-1.925191351645937e-38,5.916620005010986e-284],0,0],[[1.1331561154624403e-183,3.1554708951547898e+299,-2.1365439373622427e-112],4,0],[[3.710994234954979e+213,3.820878202523467e-296,1.7176479621738321e-282],0,0],[[4.1035311994183654e+275,2.1154012951226925e+268,-1.1203373459545064e-225],0,0],[[-1.1644934250212247e+195,-1.778006036463959e-243,1.4447268620911757e-89],0,0],[[1.0420632008764305e-255,-6.647381994040776e+28,7.492863265092149e+193],0,60.56975525027214],[[-2.22550224200597e-215,-4.4202281498453134e-210,-2.7561614443533105e+307],0,53.47169079070351],[[2.1023881259435715e-142,1.2286041871551853e+305,-7.250968489147593e+121],0,61.27436649836295],[[6.890711381796581e-252,-7.546945266760574e-90,-2.69825319383642e-133],0,0],[[1.677162052730813e-59,8.686388033007487e-215,-1.3149636586628956e+118],0,61.303087464099775],[[-6.201577640216828e-76,-2.9590397071500346e+28,-4.926806733013528e-158],0,0],[[-5.170525455803253e+144,3.4859445720092225e-35,4.821982933878669e+175],0,0],[[-1.1185816621821212e-94,4.344638216165875e-288,-1.7812260516570316e-155],0,0],[[1.187362624897409e+112,-3.4014587503013307e-66,-5.491335421336957e+149],1,0],[[6.919932177490866,-3.539516667629656e+281,-1.127329219926809e-187],0,0],[[-1.1349630928255783e-207,-1.1559445604370315e+288,-3.57999533002613e+292],0,57.706151226316194],[[1.1966617966615715e+32,-1.308443002203369e+86,-6.664362743500172e-29],0,0],[[6.432750463800895e+170,-1.1888721424009163e-144,-1.7040442460095513e-75],0,0],[[-4.744869685397997e-163,1.1038900376070258e-272,1.1135903314955052e+244],0,59.73720740931781],[[8.192710157560433e-306,2.5216713222419557e+200,2.7861975952274327e-251],1,0],[[-2.265074770534004e+131,7.839670149925818e-278,-1.735573807040294e+70],0,0],[[-3.286716298820313e-41,-3.0870693428253524e+115,-1.6615507340775114e+268],0,59.05521258753139],[[-3.6366540230121064e+282,-4.5628330785036e-235,3.412298361507663e+104],0,0],[[3.4304207896824764e+78,-1.5862298780284405e+234,-3.5257614939229864e+45],0,1.0],[[1.1418903566588686e+202,3.057923656733621e+257,1.9635189108773308e+208],1,0],[[9.104095698506237e+247,-1.395378566558569e-155,-1.008849602168032e-147],0,0],[[1.5309364148291473e+20,3.009607083325416e-208,4.696040142948554e+202],0,60.45451216541414],[[-1.4929980720652086e+294,1.672328230858498e-214,-7.579010248497065e+83],0,0],[[3.603857068482743e+158,2.9731168912425227e+223,5.5230827984860495e-214],0,1.0],[[1.2569177198304213e+35,-1.396741088899253e-104,-1.2533180509137805e-282],0,0],[[0.056030027328489294,-1.6941667724887288e+108,1.3453300471233885e+129],0,1.0],[[8.548941388682517e-48,2.8670290078668156e+257,9.339975929055322e+155],0,60.98274136957115],[[-5.333959628058546e-35,-1.37284104484469e-193,9.19691126799929e+93],1,0],[[-2.7507146943094008e-114,-4.541303516304554e-153,2.6063194423749796e+134],0,61.17384117792451],[[-7.49044213263508e+291,-1.3788096112971466e-169,2.068929278551331e+156],0,0],[[-2.6265804345369346e+191,1.9899626460259247e-13,-9.596430455745706e+100],0,0],[[5.3364583166991444e+300,-3.088836913113676e+107,-4.497723396184308e+249],0,1.0],[[-2.0013485306413847e-258,3.307434389659611e+110,-80722015057.35544],0,61.948112167540074],[[5.0305259690686196e-231,1.1795612077485763e+52,-7.81439769323426e-309],0,0],[[4.1188846940311216e-171,1.1856484764854597e+269,-1.3692306833325666e-157],1,1.0],[[1.2500602811876808e+40,2.953363332574606e-238,-4.612923893847788e+233],0,59.95326148053716],[[1.6986948886824323e+126,2.0155846495512064e+173,-7.577132280246575e+93],0,0],[[-6.227793500436146e+292,1.0729156452384357e-137,-2.1995102488491374e+92],0,0],[[1.051973877170815e-298,-2.35103610402023e+214,-1.762241542725527e+256],0,59.43317937302809],[[-3.1275696969283374e-124,1.8331795202945072e-122,7.707961271807703e-168],0,0],[[4.142690958783731e-85,2.3636227077055366e+106,-1.2013940617586167e+160],0,60.94336737312885],[[1.170023224533326e-179,-2.647095342829477e-193,-7.384894716657131e+275],0,58.75043075221173],[[1.4462182673219785e-257,6.1701670079874715e-148,-3.4096344247463026e+169],0,60.84821815160063],[[-1.3672693428204055e+119,3.515536684928011e+206,-9.852495186821838e-109],0,0],[[9.581945296609061e+205,-8.171851610632133e-29,3.9211741729059833e+93],0,0],[[-7.207768437261981e+41,1.8636896603361692e+300,2.703480388506777e-207],0,0],[[6.763159401082614e-231,5.60029751695527e-74,-3.996639231722599e-250],0,0],[[-1.660792857124932e-193,1.0163117083670472e-178,1.2848677963582702e+197],0,60.52857576061055],[[3.716620345265454e+191,1.2808656209351454e-308,-8.261513904855362e+50],0,0],[[4.079715673979633e+117,-2.897784303481398e+193,-1.7680917188681742],0,0],[[-5.893156054960838e-209,-1.2838742763593962e-306,3.2540486993164457e+100],0,61.4307459360689],[[-1.3215125919708138e-66,-1.1348077011704342e-165,1.415228692978329e+55],1,0],[[2.8299772476719073e-248,-1.5516908711200715e+114,-1.5546063348868015e+175],0,60.788019299475785],[[-7.91477975257425e-178,1.0120915835571524e+263,2.9738216870275134e+189],0,60.62448515013275],[[1.534294812232018e+296,3.6432528648228024e-99,-1.078537986809811e+95],0,0],[[-5.971284384303698e-181,-1.165108214722553e+183,-3.131868129995754e-179],0,0],[[-4.893796482840715e-96,2.3933397594674356e+274,-1.065087959176633e-15],1,1.0]],"fresh-alts":["#<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)))))))>","#<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) (* (* (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))) (* (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))))))>","#<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)))))))>"],"picked-error":15.273832875332914,"best-alt-per-point":[[[-7.097835734746746e+218,1.6219172946297815e+205,-5.707405484951641e+252],0,0],[[2.5842129352573833e+157,2.03476018732095e+119,2.3993845233584173e-107],0,1.0],[[-1.3908305214282044e-154,-2.4923117032686953e+197,-3.7981733760926524e-59],0,0],[[6.8367221822693645e+171,-2.485557599167403e+61,3.637969744290734e+272],0,0],[[3.6070289902878433e-298,2.4220868488775713e+174,-6.924414872876826e+121],0,61.27455062667296],[[-8.127295724709651e+188,1.4680641340515712e+37,2.130535351053153e+251],0,0],[[-6.59522455933465e-44,9.732025433837372e-298,4.3186153363237085e+196],0,60.534670692689666],[[4.717376995390811e-229,-2.3341562724578147e+138,-1.7808212315293658e-267],0,0],[[7.890896542811938e+189,-1.260155462227717e+139,-4.3402484094339546e-98],0,1.0],[[-2.1518590613428118e+57,-3.8472878924535176e-69,1.921602658997656e+224],0,60.12392332543967],[[-1.0752803839894087e-102,-2.4043032639901138e-220,7.317333208039203e-135],0,0],[[-3.5874867218821053e-289,6.639161457381533e+272,7.51766164914667e-83],0,62.340805957937846],[[1.2494134226790036e-90,5.2370439997769816e-251,-1.3732814838912222e+218],0,60.226141843328364],[[-147062523.161634,2.29835853317011e+39,3.8297412694520027e-72],0,0],[[-6.728931476030476e-220,-3.8960057277485095e+62,9.751429336071956e-111],0,0],[[3.4632829335752192e-251,-5.571648378152749e-24,-1.5013788162994641e-139],0,0],[[-2.647005178779469e+185,1.8598894186132259e+137,-3.3947387264781975e-158],0,0],[[2.9019277223709396e-286,-5.0486763504289305e+297,-2.2447560163594899e+161],0,60.93074969374858],[[5.463725192370479e+166,-3.3667834592100016e+22,-2.536436058187021e+276],0,0],[[1.2810755089251013e+75,9.138814505421974e-66,2.6556986431700894e-172],0,0],[[-2.8093867946453197,3.515792627928699e+199,9.597291263463799e+33],0,0],[[1.8150897130550793e+234,3.165542051316829e+57,1.579252672267158e+84],0,1.0],[[-7.8825607621194955e+93,1.1209809220161085e-271,-4.5883837368201683e+216],0,0],[[-3.255819812723566e-280,2.34479875841816e+59,5.702786507831075e+76],0,61.586896051932605],[[-1.7985967492432066e-181,-2.29441662020671e+209,-2.7064948575317953e+102],0,61.41741290190064],[[-5.456612900256313e-153,-1.6440819958925954e-123,8.045725952292009e+27],0,61.863218624207455],[[-3.267629569827715e-251,-8.654617709875635e-36,-5.243244850188282e+70],0,61.624065708565425],[[-1.2177356660474435e-254,7.810899588463585e-172,9.291488452698296e+167],0,60.86428026193053],[[-7.50461175805814e-258,-2.2074245476722926e-139,3.7649062113016876e-174],0,0],[[-2.831440759739633e+280,3.247555001847955e-09,-3.0357084245012946e-130],0,0],[[-6.590241440058156e+158,-3.600398183547405e+279,9.099484178294087e-276],0,0],[[-1.236864784914523e+307,-2.3539834087406223e+176,-1.1399021272637037e+283],0,0],[[1.2224178423718919e+201,-8.576640958071904e-118,-1.945904698138074e+294],0,0],[[-3.685865083311364e-22,3.264541092685341e+28,9.725416649719138e+252],0,59.520999571980504],[[-7.779967944948024e+102,-1.2524242674835265e-178,6.950896233858705e-22],0,0],[[-4.076760961819094e-307,-9.77225532658453e-187,4.4532169971988716e-248],0,0],[[-5.323110058228719e+306,1.1685596793963991e+198,-2.6353579322600854e+190],0,0],[[-1.9050852423101186e+177,3.272100701705269e+216,7.435874100938545e+127],0,0],[[1.7367008233662004e-146,3.241242127032787e+189,-1.8989429074771432e-61],0,0],[[-1.196163833446424e-216,-2.482218997015813e-79,-4.8603401847979466e+293],0,57.59925762427263],[[-7.885752610457983e-237,-1.8011585194123284e+244,1.710179159392655e-230],0,0],[[-4.865962690031574e-57,-9.009421056215597e-142,-5.6291122105439806e+206],0,60.3976604012631],[[-2.0273370129970457e+293,-3.089328922376561e+38,1.7761334469972786e+272],0,0],[[-6.458816293530837e+32,1.2314425699492343e+144,-4.391490797054204e-127],0,0],[[-1.3671559872942241e+32,1.7931450786375e+207,6.7889504343027e+141],0,0],[[3.717688415206528e-63,4.2329024975964494e-120,1.5110472870035968e-137],0,0],[[-3.071247325847018e+168,1.6394729264619353e-305,-2.427270407266838e-292],0,0],[[-2.2380108691988367e+176,-2.2804753660027636e-184,-417.84894784071446],0,0],[[1.273007442525311e+205,-860404.0745975035,9.790032000289722e-170],3,0],[[1.748601585802626e+143,-2.7501066713881833e-45,6.1586742802359446e+280],0,0],[[-7.693537982561176e+228,1.4196179692273589e+51,-1.816962027309807e-87],0,1.0],[[2.0434027565243845e+254,15210.1761529531,-2.7933732390832485e+50],0,1.0],[[-7.045510436190759e+250,3.865070822820752e-125,4.405711435557941e-18],0,0],[[6.86860201817031e+37,-3.6003931204734074e+177,2.9793076670648235e+135],0,0],[[-1.0747586880572918e-225,-3.914306845273933e+191,3.4461982003189476e-271],0,0],[[4.994366090310223e+293,2.9675638609500463e-266,8.497595544438243e+196],0,0],[[-2.4291085511930378e-57,3.7184381896827443e-109,9.342278142177427e-261],0,0],[[-1.9641025336330274e-36,1.5030419663802974e-174,-3.0809655420404695e-28],1,0],[[-2.439062442778655e-102,0.18720893918478226,-3.4986244195491495e-274],0,0],[[8.713457448965708e+55,1.3423233293291483e-162,1.7094985902294833e-299],0,0],[[-4.806258092707348e+97,-3.1666396733025884e-13,6.443766269775323e+116],0,0],[[-2.4346037043150295e+140,1.2878875837081438e-81,-1.2369049141682215e-238],0,0],[[-1.7508318798883553e+27,-1.626718674009136e+164,-2.303287936653167e+103],0,0],[[3.802507995980374e-176,-4.3021363265330954e+273,1.2952736416079913e-172],0,0],[[-1.654438597637836e+210,-4.5087835058803264e-119,-4.76358476622384e-40],0,0],[[-4.4587503598222035e-69,2.220662619570457e+252,-3.220071167646315e+167],0,60.869238566188756],[[-1.894259608196097e+90,3.61050150366864e+208,-4.4100791718387096e+222],0,0],[[9.426838129136436e+163,-2.3181506163130386e+81,4.678580995434083e-146],0,0],[[2.6773769570729964e-91,-3.685146484696044e-133,-6.601969142405229e+46],0,0],[[-2.267428170639853e+292,1.0258897434193047e+31,3.867922064222235e-78],0,0],[[6.811775981980025e+18,1.4782394318457476e-109,-5.609454405888344e-131],0,0],[[-1.9166323121487114e-233,-8.914664962649548e-28,6.125036550218122e+186],0,60.65675482516793],[[2.738458460650558e+50,1.2054688632397534e+33,-5.575910688006958e+201],0,0],[[-1.7060173400540982e-279,1.692419472494387e-152,-8.508186045528442e-232],0,0],[[3.496596375732988e-212,-1.7601344029867343e-290,-2.7467829813272228e+287],0,58.11261916665845],[[7.5963065745174464e-06,1.6348045764158446e-257,-4.607089829824939e-06],0,0],[[4.821955799677156e-289,-2.3184172477948065e+196,1.7483065599934842e+85],0,61.53308646175488],[[-1.0057412795601501e-141,0.060556571647326925,1.8480052807692756e-77],0,0],[[8.452451609890028e+85,3.450903835999846e-213,4.495110039324184e-82],0,0],[[-1.3252476549554923e-172,-1.2400400292246446e+273,-2.099587820327233e-176],2,0],[[-1.753002269819775e+157,2.229461735274287e-223,-5.461310186136003e+131],0,0],[[-1.265259404413343e-89,-1.0963427561332458e-156,5.741222418922647e-41],0,0],[[7.0181404927126106e+305,-1.1560520854064811e-178,3.6484688752466967e-69],0,0],[[-3.312607218501177e+276,5.094611782176626e-183,-3.6242962787554164e+165],0,0],[[-1.0064448966798171e+198,-4.253682617948995e-243,-1.6600604267765295e-45],0,0],[[-1.2261367936338352e-64,9.383817895669287e-283,3.611278323934413e-94],0,0],[[1.6564415223201099e+136,-6.991593686636276e+190,-6.602809642561733e-223],0,0],[[-4.485222205559527e+248,1.4448618247603424e-257,3.706054342154294e-129],0,0],[[7.195448856340728e-141,3384824.3314616154,-4.510161549039838e-214],3,0],[[-9.543517271590036e+203,2.6544319953421338e+293,1.1509772202461854e+130],0,0],[[7.876423561266471e+22,-5.7183056168804695e+262,2.809919074811328e-300],5,0],[[2.1859104172563636e-264,-1.6313740517107182e-227,-7.512222795104406e-168],0,0],[[-82504272040715.1,9.260475542482052e+299,-2.191896168863437e-98],5,0],[[-1.9194647450105577e+144,-5.02014609669523e+254,-3.3925149777052834e-63],0,0],[[8.359355849775862e-16,1.3310146389530143e+163,-1.3274409717698955e-301],0,0],[[-7.543647802930883e-65,4.6811315760090616e-144,2.043780925156358e+88],0,0],[[-1.3285899852668203e+268,-2.1307490533826745e+196,-2.6253419032181803e+196],0,0],[[1.046624167704608e-163,3.4631943627882644e+200,-1.3964572346787755e-152],4,0],[[-7.807986006964459e-172,4.648142651511719e+239,-4.519595929536516e-229],0,0],[[-1.3448163575524206e-16,-1.423542426143039e-129,-2.969699723262003e+31],0,0],[[5.903833024524204e-224,-5.866052212830613e+219,-2.0449888976508749e+136],0,61.157957079708986],[[6.75061600976492e-09,-6.990575505691825e-293,-2.097700040267997e+32],0,0],[[-1.0183335489303076e-199,-2.2046896841875876e+105,4.0526523047213233e+244],0,59.72462417842582],[[-4.630105582658964e+112,1.5043274345617834e+228,-231.6086328505263],0,0],[[-16083688965753228.0,-2.915269426177489e-188,-1.1146873205045003e+50],0,0],[[9.861253466270416e+140,6.509917256919526e-155,-1.235130140170164e-126],0,0],[[2.0740305822111617e-302,2.156659933698441e+65,-7.1479705794644704e+252],0,59.5239545806469],[[-3.7138781240413885e-204,-7.263550849085613e-27,5.582278109308679e-72],0,0],[[-9.324073911343234e-97,1.329109205730971e+18,2.480190476546545e-246],0,0],[[7.542398567020551e-205,3.211003609332114e-292,-2.9988557709871706e-297],0,0],[[-3.841622556722524e-66,4.607613593823294e-213,1.705817703400908e+63],0,0],[[-1.1204577574966285e-246,-4.921050894675189e-140,2.0974429565133816e-215],0,0],[[-8.048358363486665e+120,8.530068169212586e+207,2.905639146095198e+214],0,0],[[-9.958023069471933e+213,3.554023312793441e+160,1.51646550817889e-257],3,0],[[-0.0007363022252445651,-1.7841118844999841e+249,9.88160538195634e+236],0,59.88743993573152],[[-5.624997011130711e-126,2.3719183352628996e+212,-1.9742436392168267e+216],0,60.255350889881406],[[-1.0155994341356255e+111,1.1988791635038015e-56,-171.37335414723813],0,0],[[-1.7491621663626818e+238,-4.226402616530443e+259,3.50550012204851e-33],0,0],[[-7.497175243828372e+204,1.708686197016133e+79,-3.1472164561505567e-59],0,0],[[-8.05737758242569e-91,1.0057242501199301e-254,-3.222264666704597e-210],0,0],[[1.099315532911349e-23,-2.4132101870415246e+120,-7.586221492885147e-139],0,0],[[-358605196789223.75,1.4540832115601766e+80,-4.5561147022013495e+203],0,60.441063559764686],[[3.224104279734413e-128,3.8655618297451507e+264,-6.394924897500658e-104],0,0],[[-4.266935350404457e+257,-4.095681815309281e+187,6.029252458259788e+248],0,1.0],[[-1.3489282606511781e-35,2.45682697544046e-235,-1.7051167618207031e+156],0,60.98017647400547],[[-3.448018665551091e+46,4.65318267035879e+212,1.7198556401156944e+40],0,0],[[-2.868627256931542e+282,-2.532452753214596e+217,-1.0726845205664223e-63],0,0],[[-3.2017078238224426e+292,-7.4224082205270185e+121,5.394314721089183e-302],0,0],[[-3.023055730501428e-23,-1.175878359064847e-77,-3.9529958064865946e-264],0,0],[[3.6553350706241625e-209,5.073224629669749e-209,-1.2641746276125557e-259],0,0],[[-6.168869222825437e-92,-4.977701482488331e-274,2.2777945340735493e-276],0,0],[[-3.5687398900842987e+52,-8.51976038766166e+293,1.0871440614151498e+289],0,57.997392776194935],[[-1.4372534866880888e+234,4.876905254991102e+285,1.2894750780678564e+300],2,0],[[-1.6235425325048555e+261,1.4618355052890434e+227,3.043685036732137e-200],0,1.0],[[1.4920285944075702e-53,-1.738586776813829e-222,7.628653541085044e+123],0,61.258701434077615],[[4.493452818771822e-125,-1.980605354536306e-231,1.4342996382753786e-68],0,0],[[1.0963301159009184e-183,3.231394614843413e+95,-5.8891022224162905e+299],0,56.81973218624375],[[-171636426038343.06,8.895467702359268e-17,-9.062606466177737e-237],0,0],[[-4.005659624811191e+200,-18632706462072732.0,-4.1068770028392473e+21],0,0],[[-1.3688696209191408e-102,-2.0036982767287855e-282,7.084339583278926e+216],0,60.24657717169728],[[3.879381526714617e+231,-4.612024538520277e+39,1.1166277726761266e+39],0,0],[[-1.7089084754270419e-12,-1.469508077318514e+98,1.8687286825225081e+205],0,60.41843201467783],[[-9.164501627196514e-190,-5.450210145640886e-309,-2.8266439589935105e+168],0,60.859541086901274],[[2.8321391439452527e-177,1.0865881933967427e-239,1.0321884324238089e-204],0,0],[[-6.605881759005181e+183,2.194953362823915e+177,-4.99895221232182e+182],1,0],[[1.3687884379108643e+17,3.468363920687483e-275,9.235058182301351e-298],0,0],[[-1.0915024824878794e+32,1.3508330812519037e-42,-7.643304163425191e-132],0,0],[[3.258549790458107e-45,2.1316535898912934e-76,-5.329618293165233e+254],0,59.474631968114856],[[2.2420303907903802e-68,-4.147815060644267e-269,-1.5885079051767335e-90],0,0],[[-3.969894456140893e-15,-1.317053669789009e+53,5.776745162887772e-81],0,0],[[2.3939618552975763e+242,-4.127632732628039e+21,3.161587187966589e+82],0,0],[[3.2633957345317127e+251,2.0474783165414538e-126,-1.8675181824308287e+123],0,0],[[5.5609724703152094e-123,-9.698832524909335e+106,4.871284163370267e-185],0,0],[[1.9117791443554203e-134,-1.1788306068444453e-175,-7.2672182309421e-153],0,0],[[788647938.445347,-5.600514306056783e-289,-3.4507996665333636e-44],0,0],[[7.4751406322111975e-208,7.348751680152543e-306,5.656765710936691e-76],0,0],[[1.961831527193424e-60,-1.0262805742626176e-88,7.655606647706524e-307],0,0],[[-3.4535699470035837e-158,1.027405627074826e+260,-1.0089466879026102e-120],0,0],[[-8.150217400699526e-187,-1.081567422425548e+106,-7.328272485377685e-51],0,0],[[-5.600850699676017e-216,-4.569457869050411e-204,3.981491076325477e+229],0,60.02988735115003],[[-5.201902814304858e+287,-8.370936497660456e+147,1.6703871447091801e-184],0,0],[[3.294798454877577e-109,-1.1634672830494242e+297,5.873882793788073e+304],0,55.54370003871646],[[-2.5842611121723686e-83,1.9827401749271262e+183,2.468160393597418e+16],0,0],[[-4.3156972913392805e-297,2.339761031458555e-169,3.943485742551043e+214],0,60.28155775404954],[[8.23935440322281e-255,-6.993566496172953e-149,1.2414218620136766e+210],0,60.34922351850937],[[-1.8008197600788473e-210,-9.339382943714191e+219,-1.9724572392550013e+269],0,59.01688122601553],[[4.2958727261014584e+36,6.328184874755262e+301,1.7255846811749406e-291],0,1.0],[[-2.8873539429251243e+113,9.723806270790304e+261,3.669186107808967e-292],0,0],[[1.4160598314001593e+222,7.17939675829627e-158,5.706174991628051e-294],0,0],[[-8.833333360285963e+123,1.6543220134558954e+211,-2.0075913201092103e-110],0,0],[[-5.799494962865382e+179,-1.9221933359897497e-164,-4.223847889069915e-247],0,0],[[-7.412818439865646e+79,-1.1943364123385422e-44,-2.891150086994789e-239],0,0],[[7.759258852634933e-78,20833.64667003459,2.4398615081868066e+205],0,60.41694135189651],[[-1.242717444963877e+43,2.3948670500504287e-261,6.2092037474963055e+231],0,59.98868627570155],[[2.3255349808732236e+289,-1.1280084353956664e-216,-8.464143987770504e+171],0,0],[[-2.0051342910565085e+265,6.413626161349299e-227,560488966.1174189],0,0],[[2.0882744776400718e-286,-1.930574277247469e-202,1.751208589172235e-52],0,62.22394337671404],[[2.9688880181416084,-2.3040207927157378e-96,-6.579373556970536e-52],0,0],[[-4.194881103238641e+21,9.475383647572687e+150,-4.825887791830381e+144],0,0],[[1.5628986347380075e+167,8.340556674905215e+77,-3.6999440436536584e-49],0,0],[[7.077452111412406e-295,3.966194599780254e-223,3.7838902349270595e+124],0,61.25316496124588],[[4.700763524863875e+204,-2.9207329416306686e+217,1.3073288890631414e+280],0,0],[[-7.693815148540151e+114,3.2964836323184035e-155,-5.3525540351311954e-281],0,0],[[8.40015631920143e-267,5.7735379314244544e+135,-2.6804016066367006e-31],0,62.136530907271094],[[1.3086604894940812e-227,5.110728256051039e-260,-2.2230057586741136e-141],0,0],[[5.996749315117597e+34,-2.0470315990098174e-13,-3.551599710870501e-79],0,0],[[-1.3512698516924462e+222,4.5201803639304495e+192,3.8910566195656857e-199],0,1.0],[[-3.0811702649623344e-274,2.3443867491657545e+246,-6.131456919104946e-248],0,0],[[-8.64483328785185e-272,2.6015556795165393e-281,3.569525897033803e-203],0,0],[[-3.696014574690946e+253,-6.234818190089148e-22,1.0433422764871603e+92],0,0],[[2.911945305258545e+76,1.607081485572248e+287,3.0951906535851436e+156],0,0],[[-2.304902569428671e-278,4.842080607450392e+183,-1.3710886835561032e-37],0,62.16307349980139],[[-3.0626399470140506e+19,1.9567613186327648e-98,1.3180753941144182e-147],0,0],[[-7.302755623144034e-92,2.034142710886352e+76,2.645632745156305e+72],0,61.61379429787259],[[-1.64305460819134e+147,-1.925191351645937e-38,5.916620005010986e-284],0,0],[[1.1331561154624403e-183,3.1554708951547898e+299,-2.1365439373622427e-112],0,0],[[3.710994234954979e+213,3.820878202523467e-296,1.7176479621738321e-282],0,0],[[4.1035311994183654e+275,2.1154012951226925e+268,-1.1203373459545064e-225],0,0],[[-1.1644934250212247e+195,-1.778006036463959e-243,1.4447268620911757e-89],0,0],[[1.0420632008764305e-255,-6.647381994040776e+28,7.492863265092149e+193],0,60.56975525027214],[[-2.22550224200597e-215,-4.4202281498453134e-210,-2.7561614443533105e+307],0,53.47169079070351],[[2.1023881259435715e-142,1.2286041871551853e+305,-7.250968489147593e+121],0,61.27436649836295],[[6.890711381796581e-252,-7.546945266760574e-90,-2.69825319383642e-133],0,0],[[1.677162052730813e-59,8.686388033007487e-215,-1.3149636586628956e+118],0,61.303087464099775],[[-6.201577640216828e-76,-2.9590397071500346e+28,-4.926806733013528e-158],0,0],[[-5.170525455803253e+144,3.4859445720092225e-35,4.821982933878669e+175],0,0],[[-1.1185816621821212e-94,4.344638216165875e-288,-1.7812260516570316e-155],0,0],[[1.187362624897409e+112,-3.4014587503013307e-66,-5.491335421336957e+149],2,0],[[6.919932177490866,-3.539516667629656e+281,-1.127329219926809e-187],0,0],[[-1.1349630928255783e-207,-1.1559445604370315e+288,-3.57999533002613e+292],0,57.706151226316194],[[1.1966617966615715e+32,-1.308443002203369e+86,-6.664362743500172e-29],0,0],[[6.432750463800895e+170,-1.1888721424009163e-144,-1.7040442460095513e-75],0,0],[[-4.744869685397997e-163,1.1038900376070258e-272,1.1135903314955052e+244],0,59.73720740931781],[[8.192710157560433e-306,2.5216713222419557e+200,2.7861975952274327e-251],0,0],[[-2.265074770534004e+131,7.839670149925818e-278,-1.735573807040294e+70],0,0],[[-3.286716298820313e-41,-3.0870693428253524e+115,-1.6615507340775114e+268],0,59.05521258753139],[[-3.6366540230121064e+282,-4.5628330785036e-235,3.412298361507663e+104],0,0],[[3.4304207896824764e+78,-1.5862298780284405e+234,-3.5257614939229864e+45],0,1.0],[[1.1418903566588686e+202,3.057923656733621e+257,1.9635189108773308e+208],2,0],[[9.104095698506237e+247,-1.395378566558569e-155,-1.008849602168032e-147],0,0],[[1.5309364148291473e+20,3.009607083325416e-208,4.696040142948554e+202],0,60.45451216541414],[[-1.4929980720652086e+294,1.672328230858498e-214,-7.579010248497065e+83],0,0],[[3.603857068482743e+158,2.9731168912425227e+223,5.5230827984860495e-214],0,1.0],[[1.2569177198304213e+35,-1.396741088899253e-104,-1.2533180509137805e-282],0,0],[[0.056030027328489294,-1.6941667724887288e+108,1.3453300471233885e+129],0,0],[[8.548941388682517e-48,2.8670290078668156e+257,9.339975929055322e+155],0,60.98274136957115],[[-5.333959628058546e-35,-1.37284104484469e-193,9.19691126799929e+93],0,0],[[-2.7507146943094008e-114,-4.541303516304554e-153,2.6063194423749796e+134],0,61.17384117792451],[[-7.49044213263508e+291,-1.3788096112971466e-169,2.068929278551331e+156],0,0],[[-2.6265804345369346e+191,1.9899626460259247e-13,-9.596430455745706e+100],0,0],[[5.3364583166991444e+300,-3.088836913113676e+107,-4.497723396184308e+249],0,1.0],[[-2.0013485306413847e-258,3.307434389659611e+110,-80722015057.35544],0,61.948112167540074],[[5.0305259690686196e-231,1.1795612077485763e+52,-7.81439769323426e-309],0,0],[[4.1188846940311216e-171,1.1856484764854597e+269,-1.3692306833325666e-157],0,0],[[1.2500602811876808e+40,2.953363332574606e-238,-4.612923893847788e+233],0,59.95326148053716],[[1.6986948886824323e+126,2.0155846495512064e+173,-7.577132280246575e+93],0,0],[[-6.227793500436146e+292,1.0729156452384357e-137,-2.1995102488491374e+92],0,0],[[1.051973877170815e-298,-2.35103610402023e+214,-1.762241542725527e+256],0,59.43317937302809],[[-3.1275696969283374e-124,1.8331795202945072e-122,7.707961271807703e-168],0,0],[[4.142690958783731e-85,2.3636227077055366e+106,-1.2013940617586167e+160],0,60.94336737312885],[[1.170023224533326e-179,-2.647095342829477e-193,-7.384894716657131e+275],0,58.75043075221173],[[1.4462182673219785e-257,6.1701670079874715e-148,-3.4096344247463026e+169],0,60.84821815160063],[[-1.3672693428204055e+119,3.515536684928011e+206,-9.852495186821838e-109],0,0],[[9.581945296609061e+205,-8.171851610632133e-29,3.9211741729059833e+93],0,0],[[-7.207768437261981e+41,1.8636896603361692e+300,2.703480388506777e-207],0,0],[[6.763159401082614e-231,5.60029751695527e-74,-3.996639231722599e-250],0,0],[[-1.660792857124932e-193,1.0163117083670472e-178,1.2848677963582702e+197],0,60.52857576061055],[[3.716620345265454e+191,1.2808656209351454e-308,-8.261513904855362e+50],0,0],[[4.079715673979633e+117,-2.897784303481398e+193,-1.7680917188681742],0,0],[[-5.893156054960838e-209,-1.2838742763593962e-306,3.2540486993164457e+100],0,61.4307459360689],[[-1.3215125919708138e-66,-1.1348077011704342e-165,1.415228692978329e+55],0,0],[[2.8299772476719073e-248,-1.5516908711200715e+114,-1.5546063348868015e+175],0,60.788019299475785],[[-7.91477975257425e-178,1.0120915835571524e+263,2.9738216870275134e+189],0,60.62448515013275],[[1.534294812232018e+296,3.6432528648228024e-99,-1.078537986809811e+95],0,0],[[-5.971284384303698e-181,-1.165108214722553e+183,-3.131868129995754e-179],0,0],[[-4.893796482840715e-96,2.3933397594674356e+274,-1.065087959176633e-15],0,0]],"picked":"(λ (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)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 1 2)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 2 1)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 1 2 1)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) 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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) 1/4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (+ 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 (/ (+ (* -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 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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) 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 (+ (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 (- (+ (* 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 (+ (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]backup-simplify:  Simplify 0 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 (+ (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 (- (+ (* 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 (+ (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 (- (+ (* 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 (+ (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]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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (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 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 J
* [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]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 (- 0) into 0
* [misc]backup-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 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 (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1) 1/4)
* * * * [misc]progress:  [ 2 / 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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) 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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) 1/4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/4 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (log (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (pow (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (+ 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 (/ (+ (* -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 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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) 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 (+ (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 (- (+ (* 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 (+ (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]backup-simplify:  Simplify 0 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 (+ (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 (- (+ (* 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 (+ (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 (- (+ (* 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 (+ (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]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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (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 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 J
* [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]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 (- 0) into 0
* [misc]backup-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 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 (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1) 1/4)
* * * * [misc]progress:  [ 3 / 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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (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 (+ 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 (/ (+ (* -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 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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 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 (+ (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 (- (+ (* 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 (+ (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]backup-simplify:  Simplify 0 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 (+ (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 (- (+ (* 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 (+ (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 (- (+ (* 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 (+ (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]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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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]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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ 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 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 J
* [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 (+ 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 (- 0) into 0
* [misc]backup-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 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 (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1))
* * * * [misc]progress:  [ 4 / 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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (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 (+ 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 (/ (+ (* -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 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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 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 (+ (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 (- (+ (* 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 (+ (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]backup-simplify:  Simplify 0 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 (+ (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 (- (+ (* 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 (+ (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 (- (+ (* 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 (+ (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]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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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]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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ 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 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 J
* [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 (+ 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 (- 0) into 0
* [misc]backup-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 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 (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1))
* * * [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))))) (pow (sqrt (+ 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))))) (pow (sqrt (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))))) (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:  [ 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))))) (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:  [ 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))))) (* (* (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 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 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:  [ 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))))) (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 (109 enodes)
* * [misc]simplify:  iters left: 2 (335 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (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 (* (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 (106 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (fabs (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:  [ 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 (* (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 (106 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (fabs (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:  [ 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 (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:  [ 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 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [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 (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:  [ 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 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (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 (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 (204 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 (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 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 (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:  [ 15 / 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:  [ 16 / 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:  [ 17 / 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:  [ 18 / 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:  [ 19 / 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:  [ 20 / 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:  [ 21 / 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:  [ 22 / 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:  [ 23 / 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 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 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:  [ 24 / 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 (109 enodes)
* * [misc]simplify:  iters left: 2 (335 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 25 / 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 (106 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (fabs (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:  [ 26 / 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 (106 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (fabs (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:  [ 27 / 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:  [ 28 / 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 29 / 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:  [ 30 / 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 31 / 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 (204 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 (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 32 / 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:  [ 33 / 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:  [ 34 / 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:  [ 35 / 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:  [ 36 / 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:  [ 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 (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2))))>
* * * * [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 (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 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 (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (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 (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (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 (* (* (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 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 (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 (135 enodes)
* [exit]simplify:  Simplified to (* (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1) (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)))) 1) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [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 (* (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 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 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))))) (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [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))))) (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 (326 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:  [ 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))))) (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 (214 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3))))
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ 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 (333 enodes)
* [exit]simplify:  Simplified to (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 (- (pow (/ (/ U (* J 2)) (cos (/ K 2))) (+ 3 1)) (- (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 47 / 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 (190 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* J 2)) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* J 2)) (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 (482 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 48 / 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 49 / 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:  [ 50 / 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:  [ 51 / 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:  [ 52 / 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:  [ 53 / 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 54 / 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 55 / 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 56 / 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 (135 enodes)
* [exit]simplify:  Simplified to (* (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1) (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)))) 1) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 57 / 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 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 58 / 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 59 / 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 (326 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:  [ 60 / 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 (214 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3))))
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ 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 (333 enodes)
* [exit]simplify:  Simplified to (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 (- (pow (/ (/ U (* J 2)) (cos (/ K 2))) (+ 3 1)) (- (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 61 / 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 (190 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* J 2)) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* J 2)) (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 (482 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 62 / 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 63 / 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:  [ 64 / 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:  [ 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))))) (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 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (* (cos (/ K 2)) (* J -2)) (pow (+ (* (* (/ 1/2 J) U) (* (/ 1/2 J) U)) 1) 1/4)))
* * * * [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))))) (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 (* (pow (+ (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U)))) 1) 1/4) (* (* (cos (/ K 2)) (* J -2)) (sqrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* * * * [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))))) (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 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 (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1) 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 (* (pow (+ 1 (pow (exp 2) (+ (- (log (/ -1 J)) (log (/ -1 U))) (log (/ 1/2 (cos (* K 1/2))))))) 1/4) (* (* (cos (/ K 2)) (* J -2)) (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 68 / 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 (343 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (cos (/ K 2)) (* J -2)) (pow (+ (* (/ (* U 1/2) J) (/ (* U 1/2) J)) 1) 1/4)))
* * * * [misc]progress:  [ 69 / 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 (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* J -2))) (pow (+ (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U)))) 1) 1/4))
* * * * [misc]progress:  [ 70 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (pow (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 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 (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1) 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 (* (* (sqrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (* (cos (/ K 2)) (* J -2))) (pow (+ (pow (exp 2) (+ (log (/ 1/2 (cos (* 1/2 K)))) (- (log (/ -1 J)) (log (/ -1 U))))) 1) 1/4))
* * * * [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))))) (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 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (* (cos (/ K 2)) (* J -2)) (sqrt (sqrt (+ (* (* (/ 1/2 J) U) (* (/ 1/2 J) U)) 1)))))
* * * * [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))))) (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 (* (sqrt (sqrt (+ (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U)))) 1))) (* (* (cos (/ K 2)) (* J -2)) (sqrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* * * * [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))))) (sqrt (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 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 (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1))))
* * [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 (+ 1 (pow (exp 2) (+ (- (log (/ -1 J)) (log (/ -1 U))) (log (/ 1/2 (cos (* K 1/2))))))))) (* (* (cos (/ K 2)) (* J -2)) (sqrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 74 / 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 (343 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (cos (/ K 2)) (* J -2)) (sqrt (sqrt (+ (* (/ (* U 1/2) J) (/ (* U 1/2) J)) 1)))))
* * * * [misc]progress:  [ 75 / 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 (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* J -2))) (sqrt (sqrt (+ (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U)))) 1))))
* * * * [misc]progress:  [ 76 / 76 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 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 (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)))) (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 (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (* (cos (/ K 2)) (* J -2))) (sqrt (sqrt (+ (pow (exp 2) (+ (log (/ 1/2 (cos (* 1/2 K)))) (- (log (/ -1 J)) (log (/ -1 U))))) 1))))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 3 / 4
* * * [misc]progress:  picking best candidate
"ALT DATA: "{"all-alts":["#<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) (* (* (* -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)))))))>","#<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) (* (* (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))) (* (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))))))>","#<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)))))))>"],"best-fresh-alt-per-point":[[[-7.097835734746746e+218,1.6219172946297815e+205,-5.707405484951641e+252],0,0],[[2.5842129352573833e+157,2.03476018732095e+119,2.3993845233584173e-107],0,1.0],[[-1.3908305214282044e-154,-2.4923117032686953e+197,-3.7981733760926524e-59],0,0],[[6.8367221822693645e+171,-2.485557599167403e+61,3.637969744290734e+272],0,0],[[3.6070289902878433e-298,2.4220868488775713e+174,-6.924414872876826e+121],0,61.27455062667296],[[-8.127295724709651e+188,1.4680641340515712e+37,2.130535351053153e+251],2,1.0],[[-6.59522455933465e-44,9.732025433837372e-298,4.3186153363237085e+196],0,60.534670692689666],[[4.717376995390811e-229,-2.3341562724578147e+138,-1.7808212315293658e-267],0,0],[[7.890896542811938e+189,-1.260155462227717e+139,-4.3402484094339546e-98],0,1.0],[[-2.1518590613428118e+57,-3.8472878924535176e-69,1.921602658997656e+224],0,60.12392332543967],[[-1.0752803839894087e-102,-2.4043032639901138e-220,7.317333208039203e-135],0,0],[[-3.5874867218821053e-289,6.639161457381533e+272,7.51766164914667e-83],0,62.340805957937846],[[1.2494134226790036e-90,5.2370439997769816e-251,-1.3732814838912222e+218],0,60.226141843328364],[[-147062523.161634,2.29835853317011e+39,3.8297412694520027e-72],0,0],[[-6.728931476030476e-220,-3.8960057277485095e+62,9.751429336071956e-111],3,0],[[3.4632829335752192e-251,-5.571648378152749e-24,-1.5013788162994641e-139],0,1.0],[[-2.647005178779469e+185,1.8598894186132259e+137,-3.3947387264781975e-158],0,0],[[2.9019277223709396e-286,-5.0486763504289305e+297,-2.2447560163594899e+161],0,60.93074969374858],[[5.463725192370479e+166,-3.3667834592100016e+22,-2.536436058187021e+276],3,0],[[1.2810755089251013e+75,9.138814505421974e-66,2.6556986431700894e-172],0,0],[[-2.8093867946453197,3.515792627928699e+199,9.597291263463799e+33],1,1.0],[[1.8150897130550793e+234,3.165542051316829e+57,1.579252672267158e+84],0,1.0],[[-7.8825607621194955e+93,1.1209809220161085e-271,-4.5883837368201683e+216],1,1.0],[[-3.255819812723566e-280,2.34479875841816e+59,5.702786507831075e+76],0,61.586896051932605],[[-1.7985967492432066e-181,-2.29441662020671e+209,-2.7064948575317953e+102],0,61.41741290190064],[[-5.456612900256313e-153,-1.6440819958925954e-123,8.045725952292009e+27],0,61.863218624207455],[[-3.267629569827715e-251,-8.654617709875635e-36,-5.243244850188282e+70],0,61.624065708565425],[[-1.2177356660474435e-254,7.810899588463585e-172,9.291488452698296e+167],0,60.86428026193053],[[-7.50461175805814e-258,-2.2074245476722926e-139,3.7649062113016876e-174],3,1.0],[[-2.831440759739633e+280,3.247555001847955e-09,-3.0357084245012946e-130],0,0],[[-6.590241440058156e+158,-3.600398183547405e+279,9.099484178294087e-276],0,0],[[-1.236864784914523e+307,-2.3539834087406223e+176,-1.1399021272637037e+283],0,0],[[1.2224178423718919e+201,-8.576640958071904e-118,-1.945904698138074e+294],0,1.0],[[-3.685865083311364e-22,3.264541092685341e+28,9.725416649719138e+252],0,59.520999571980504],[[-7.779967944948024e+102,-1.2524242674835265e-178,6.950896233858705e-22],0,0],[[-4.076760961819094e-307,-9.77225532658453e-187,4.4532169971988716e-248],0,0],[[-5.323110058228719e+306,1.1685596793963991e+198,-2.6353579322600854e+190],0,0],[[-1.9050852423101186e+177,3.272100701705269e+216,7.435874100938545e+127],0,0],[[1.7367008233662004e-146,3.241242127032787e+189,-1.8989429074771432e-61],1,0],[[-1.196163833446424e-216,-2.482218997015813e-79,-4.8603401847979466e+293],0,57.59925762427263],[[-7.885752610457983e-237,-1.8011585194123284e+244,1.710179159392655e-230],1,0],[[-4.865962690031574e-57,-9.009421056215597e-142,-5.6291122105439806e+206],0,60.3976604012631],[[-2.0273370129970457e+293,-3.089328922376561e+38,1.7761334469972786e+272],0,0],[[-6.458816293530837e+32,1.2314425699492343e+144,-4.391490797054204e-127],0,0],[[-1.3671559872942241e+32,1.7931450786375e+207,6.7889504343027e+141],3,0],[[3.717688415206528e-63,4.2329024975964494e-120,1.5110472870035968e-137],0,0],[[-3.071247325847018e+168,1.6394729264619353e-305,-2.427270407266838e-292],0,0],[[-2.2380108691988367e+176,-2.2804753660027636e-184,-417.84894784071446],0,0],[[1.273007442525311e+205,-860404.0745975035,9.790032000289722e-170],1,0],[[1.748601585802626e+143,-2.7501066713881833e-45,6.1586742802359446e+280],0,1.5849625007211563],[[-7.693537982561176e+228,1.4196179692273589e+51,-1.816962027309807e-87],0,1.0],[[2.0434027565243845e+254,15210.1761529531,-2.7933732390832485e+50],0,1.0],[[-7.045510436190759e+250,3.865070822820752e-125,4.405711435557941e-18],0,0],[[6.86860201817031e+37,-3.6003931204734074e+177,2.9793076670648235e+135],1,0],[[-1.0747586880572918e-225,-3.914306845273933e+191,3.4461982003189476e-271],0,0],[[4.994366090310223e+293,2.9675638609500463e-266,8.497595544438243e+196],0,0],[[-2.4291085511930378e-57,3.7184381896827443e-109,9.342278142177427e-261],0,0],[[-1.9641025336330274e-36,1.5030419663802974e-174,-3.0809655420404695e-28],0,0],[[-2.439062442778655e-102,0.18720893918478226,-3.4986244195491495e-274],0,0],[[8.713457448965708e+55,1.3423233293291483e-162,1.7094985902294833e-299],0,0],[[-4.806258092707348e+97,-3.1666396733025884e-13,6.443766269775323e+116],3,0],[[-2.4346037043150295e+140,1.2878875837081438e-81,-1.2369049141682215e-238],0,0],[[-1.7508318798883553e+27,-1.626718674009136e+164,-2.303287936653167e+103],0,0],[[3.802507995980374e-176,-4.3021363265330954e+273,1.2952736416079913e-172],0,1.0],[[-1.654438597637836e+210,-4.5087835058803264e-119,-4.76358476622384e-40],0,0],[[-4.4587503598222035e-69,2.220662619570457e+252,-3.220071167646315e+167],0,60.869238566188756],[[-1.894259608196097e+90,3.61050150366864e+208,-4.4100791718387096e+222],0,0],[[9.426838129136436e+163,-2.3181506163130386e+81,4.678580995434083e-146],0,0],[[2.6773769570729964e-91,-3.685146484696044e-133,-6.601969142405229e+46],2,1.0],[[-2.267428170639853e+292,1.0258897434193047e+31,3.867922064222235e-78],0,0],[[6.811775981980025e+18,1.4782394318457476e-109,-5.609454405888344e-131],0,0],[[-1.9166323121487114e-233,-8.914664962649548e-28,6.125036550218122e+186],0,60.65675482516793],[[2.738458460650558e+50,1.2054688632397534e+33,-5.575910688006958e+201],0,1.0],[[-1.7060173400540982e-279,1.692419472494387e-152,-8.508186045528442e-232],3,0],[[3.496596375732988e-212,-1.7601344029867343e-290,-2.7467829813272228e+287],0,58.11261916665845],[[7.5963065745174464e-06,1.6348045764158446e-257,-4.607089829824939e-06],2,0],[[4.821955799677156e-289,-2.3184172477948065e+196,1.7483065599934842e+85],0,61.53308646175488],[[-1.0057412795601501e-141,0.060556571647326925,1.8480052807692756e-77],3,0],[[8.452451609890028e+85,3.450903835999846e-213,4.495110039324184e-82],0,0],[[-1.3252476549554923e-172,-1.2400400292246446e+273,-2.099587820327233e-176],2,0],[[-1.753002269819775e+157,2.229461735274287e-223,-5.461310186136003e+131],0,0],[[-1.265259404413343e-89,-1.0963427561332458e-156,5.741222418922647e-41],0,0],[[7.0181404927126106e+305,-1.1560520854064811e-178,3.6484688752466967e-69],0,0],[[-3.312607218501177e+276,5.094611782176626e-183,-3.6242962787554164e+165],0,0],[[-1.0064448966798171e+198,-4.253682617948995e-243,-1.6600604267765295e-45],0,0],[[-1.2261367936338352e-64,9.383817895669287e-283,3.611278323934413e-94],0,0],[[1.6564415223201099e+136,-6.991593686636276e+190,-6.602809642561733e-223],0,0],[[-4.485222205559527e+248,1.4448618247603424e-257,3.706054342154294e-129],0,0],[[7.195448856340728e-141,3384824.3314616154,-4.510161549039838e-214],1,0],[[-9.543517271590036e+203,2.6544319953421338e+293,1.1509772202461854e+130],0,0],[[7.876423561266471e+22,-5.7183056168804695e+262,2.809919074811328e-300],3,0],[[2.1859104172563636e-264,-1.6313740517107182e-227,-7.512222795104406e-168],0,1.5849625007211563],[[-82504272040715.1,9.260475542482052e+299,-2.191896168863437e-98],3,0],[[-1.9194647450105577e+144,-5.02014609669523e+254,-3.3925149777052834e-63],0,0],[[8.359355849775862e-16,1.3310146389530143e+163,-1.3274409717698955e-301],0,0],[[-7.543647802930883e-65,4.6811315760090616e-144,2.043780925156358e+88],0,0],[[-1.3285899852668203e+268,-2.1307490533826745e+196,-2.6253419032181803e+196],0,0],[[1.046624167704608e-163,3.4631943627882644e+200,-1.3964572346787755e-152],2,0],[[-7.807986006964459e-172,4.648142651511719e+239,-4.519595929536516e-229],0,0],[[-1.3448163575524206e-16,-1.423542426143039e-129,-2.969699723262003e+31],0,0],[[5.903833024524204e-224,-5.866052212830613e+219,-2.0449888976508749e+136],0,61.157957079708986],[[6.75061600976492e-09,-6.990575505691825e-293,-2.097700040267997e+32],0,0],[[-1.0183335489303076e-199,-2.2046896841875876e+105,4.0526523047213233e+244],0,59.72462417842582],[[-4.630105582658964e+112,1.5043274345617834e+228,-231.6086328505263],0,0],[[-16083688965753228.0,-2.915269426177489e-188,-1.1146873205045003e+50],3,0],[[9.861253466270416e+140,6.509917256919526e-155,-1.235130140170164e-126],0,0],[[2.0740305822111617e-302,2.156659933698441e+65,-7.1479705794644704e+252],0,59.5239545806469],[[-3.7138781240413885e-204,-7.263550849085613e-27,5.582278109308679e-72],3,0],[[-9.324073911343234e-97,1.329109205730971e+18,2.480190476546545e-246],0,0],[[7.542398567020551e-205,3.211003609332114e-292,-2.9988557709871706e-297],0,0],[[-3.841622556722524e-66,4.607613593823294e-213,1.705817703400908e+63],3,0],[[-1.1204577574966285e-246,-4.921050894675189e-140,2.0974429565133816e-215],3,0],[[-8.048358363486665e+120,8.530068169212586e+207,2.905639146095198e+214],3,1.0],[[-9.958023069471933e+213,3.554023312793441e+160,1.51646550817889e-257],1,0],[[-0.0007363022252445651,-1.7841118844999841e+249,9.88160538195634e+236],0,59.88743993573152],[[-5.624997011130711e-126,2.3719183352628996e+212,-1.9742436392168267e+216],0,60.255350889881406],[[-1.0155994341356255e+111,1.1988791635038015e-56,-171.37335414723813],0,0],[[-1.7491621663626818e+238,-4.226402616530443e+259,3.50550012204851e-33],0,0],[[-7.497175243828372e+204,1.708686197016133e+79,-3.1472164561505567e-59],0,0],[[-8.05737758242569e-91,1.0057242501199301e-254,-3.222264666704597e-210],0,0],[[1.099315532911349e-23,-2.4132101870415246e+120,-7.586221492885147e-139],0,0],[[-358605196789223.75,1.4540832115601766e+80,-4.5561147022013495e+203],0,60.441063559764686],[[3.224104279734413e-128,3.8655618297451507e+264,-6.394924897500658e-104],1,0],[[-4.266935350404457e+257,-4.095681815309281e+187,6.029252458259788e+248],0,1.0],[[-1.3489282606511781e-35,2.45682697544046e-235,-1.7051167618207031e+156],0,60.98017647400547],[[-3.448018665551091e+46,4.65318267035879e+212,1.7198556401156944e+40],0,0],[[-2.868627256931542e+282,-2.532452753214596e+217,-1.0726845205664223e-63],0,0],[[-3.2017078238224426e+292,-7.4224082205270185e+121,5.394314721089183e-302],0,0],[[-3.023055730501428e-23,-1.175878359064847e-77,-3.9529958064865946e-264],0,0],[[3.6553350706241625e-209,5.073224629669749e-209,-1.2641746276125557e-259],0,0],[[-6.168869222825437e-92,-4.977701482488331e-274,2.2777945340735493e-276],0,0],[[-3.5687398900842987e+52,-8.51976038766166e+293,1.0871440614151498e+289],0,57.997392776194935],[[-1.4372534866880888e+234,4.876905254991102e+285,1.2894750780678564e+300],0,1.0],[[-1.6235425325048555e+261,1.4618355052890434e+227,3.043685036732137e-200],0,1.0],[[1.4920285944075702e-53,-1.738586776813829e-222,7.628653541085044e+123],0,61.258701434077615],[[4.493452818771822e-125,-1.980605354536306e-231,1.4342996382753786e-68],1,1.5849625007211563],[[1.0963301159009184e-183,3.231394614843413e+95,-5.8891022224162905e+299],0,56.81973218624375],[[-171636426038343.06,8.895467702359268e-17,-9.062606466177737e-237],0,0],[[-4.005659624811191e+200,-18632706462072732.0,-4.1068770028392473e+21],0,0],[[-1.3688696209191408e-102,-2.0036982767287855e-282,7.084339583278926e+216],0,60.24657717169728],[[3.879381526714617e+231,-4.612024538520277e+39,1.1166277726761266e+39],0,0],[[-1.7089084754270419e-12,-1.469508077318514e+98,1.8687286825225081e+205],0,60.41843201467783],[[-9.164501627196514e-190,-5.450210145640886e-309,-2.8266439589935105e+168],0,60.859541086901274],[[2.8321391439452527e-177,1.0865881933967427e-239,1.0321884324238089e-204],0,0],[[-6.605881759005181e+183,2.194953362823915e+177,-4.99895221232182e+182],0,0],[[1.3687884379108643e+17,3.468363920687483e-275,9.235058182301351e-298],0,0],[[-1.0915024824878794e+32,1.3508330812519037e-42,-7.643304163425191e-132],0,0],[[3.258549790458107e-45,2.1316535898912934e-76,-5.329618293165233e+254],0,59.474631968114856],[[2.2420303907903802e-68,-4.147815060644267e-269,-1.5885079051767335e-90],0,0],[[-3.969894456140893e-15,-1.317053669789009e+53,5.776745162887772e-81],0,0],[[2.3939618552975763e+242,-4.127632732628039e+21,3.161587187966589e+82],0,0],[[3.2633957345317127e+251,2.0474783165414538e-126,-1.8675181824308287e+123],0,0],[[5.5609724703152094e-123,-9.698832524909335e+106,4.871284163370267e-185],0,0],[[1.9117791443554203e-134,-1.1788306068444453e-175,-7.2672182309421e-153],0,0],[[788647938.445347,-5.600514306056783e-289,-3.4507996665333636e-44],0,0],[[7.4751406322111975e-208,7.348751680152543e-306,5.656765710936691e-76],0,0],[[1.961831527193424e-60,-1.0262805742626176e-88,7.655606647706524e-307],0,0],[[-3.4535699470035837e-158,1.027405627074826e+260,-1.0089466879026102e-120],1,1.0],[[-8.150217400699526e-187,-1.081567422425548e+106,-7.328272485377685e-51],1,0],[[-5.600850699676017e-216,-4.569457869050411e-204,3.981491076325477e+229],0,60.02988735115003],[[-5.201902814304858e+287,-8.370936497660456e+147,1.6703871447091801e-184],0,0],[[3.294798454877577e-109,-1.1634672830494242e+297,5.873882793788073e+304],0,55.54370003871646],[[-2.5842611121723686e-83,1.9827401749271262e+183,2.468160393597418e+16],1,1.0],[[-4.3156972913392805e-297,2.339761031458555e-169,3.943485742551043e+214],0,60.28155775404954],[[8.23935440322281e-255,-6.993566496172953e-149,1.2414218620136766e+210],0,60.34922351850937],[[-1.8008197600788473e-210,-9.339382943714191e+219,-1.9724572392550013e+269],0,59.01688122601553],[[4.2958727261014584e+36,6.328184874755262e+301,1.7255846811749406e-291],0,1.0],[[-2.8873539429251243e+113,9.723806270790304e+261,3.669186107808967e-292],0,0],[[1.4160598314001593e+222,7.17939675829627e-158,5.706174991628051e-294],0,0],[[-8.833333360285963e+123,1.6543220134558954e+211,-2.0075913201092103e-110],0,0],[[-5.799494962865382e+179,-1.9221933359897497e-164,-4.223847889069915e-247],0,0],[[-7.412818439865646e+79,-1.1943364123385422e-44,-2.891150086994789e-239],0,0],[[7.759258852634933e-78,20833.64667003459,2.4398615081868066e+205],0,60.41694135189651],[[-1.242717444963877e+43,2.3948670500504287e-261,6.2092037474963055e+231],0,59.98868627570155],[[2.3255349808732236e+289,-1.1280084353956664e-216,-8.464143987770504e+171],0,0],[[-2.0051342910565085e+265,6.413626161349299e-227,560488966.1174189],0,0],[[2.0882744776400718e-286,-1.930574277247469e-202,1.751208589172235e-52],0,62.22394337671404],[[2.9688880181416084,-2.3040207927157378e-96,-6.579373556970536e-52],0,0],[[-4.194881103238641e+21,9.475383647572687e+150,-4.825887791830381e+144],3,0],[[1.5628986347380075e+167,8.340556674905215e+77,-3.6999440436536584e-49],0,0],[[7.077452111412406e-295,3.966194599780254e-223,3.7838902349270595e+124],0,61.25316496124588],[[4.700763524863875e+204,-2.9207329416306686e+217,1.3073288890631414e+280],2,0],[[-7.693815148540151e+114,3.2964836323184035e-155,-5.3525540351311954e-281],0,0],[[8.40015631920143e-267,5.7735379314244544e+135,-2.6804016066367006e-31],0,62.136530907271094],[[1.3086604894940812e-227,5.110728256051039e-260,-2.2230057586741136e-141],0,1.5849625007211563],[[5.996749315117597e+34,-2.0470315990098174e-13,-3.551599710870501e-79],0,0],[[-1.3512698516924462e+222,4.5201803639304495e+192,3.8910566195656857e-199],0,1.0],[[-3.0811702649623344e-274,2.3443867491657545e+246,-6.131456919104946e-248],3,1.0],[[-8.64483328785185e-272,2.6015556795165393e-281,3.569525897033803e-203],2,1.0],[[-3.696014574690946e+253,-6.234818190089148e-22,1.0433422764871603e+92],0,0],[[2.911945305258545e+76,1.607081485572248e+287,3.0951906535851436e+156],0,0],[[-2.304902569428671e-278,4.842080607450392e+183,-1.3710886835561032e-37],0,62.16307349980139],[[-3.0626399470140506e+19,1.9567613186327648e-98,1.3180753941144182e-147],0,0],[[-7.302755623144034e-92,2.034142710886352e+76,2.645632745156305e+72],0,61.61379429787259],[[-1.64305460819134e+147,-1.925191351645937e-38,5.916620005010986e-284],0,0],[[1.1331561154624403e-183,3.1554708951547898e+299,-2.1365439373622427e-112],3,0],[[3.710994234954979e+213,3.820878202523467e-296,1.7176479621738321e-282],0,0],[[4.1035311994183654e+275,2.1154012951226925e+268,-1.1203373459545064e-225],0,0],[[-1.1644934250212247e+195,-1.778006036463959e-243,1.4447268620911757e-89],0,0],[[1.0420632008764305e-255,-6.647381994040776e+28,7.492863265092149e+193],0,60.56975525027214],[[-2.22550224200597e-215,-4.4202281498453134e-210,-2.7561614443533105e+307],0,53.47169079070351],[[2.1023881259435715e-142,1.2286041871551853e+305,-7.250968489147593e+121],0,61.27436649836295],[[6.890711381796581e-252,-7.546945266760574e-90,-2.69825319383642e-133],0,0],[[1.677162052730813e-59,8.686388033007487e-215,-1.3149636586628956e+118],0,61.303087464099775],[[-6.201577640216828e-76,-2.9590397071500346e+28,-4.926806733013528e-158],0,0],[[-5.170525455803253e+144,3.4859445720092225e-35,4.821982933878669e+175],0,0],[[-1.1185816621821212e-94,4.344638216165875e-288,-1.7812260516570316e-155],0,0],[[1.187362624897409e+112,-3.4014587503013307e-66,-5.491335421336957e+149],1,0],[[6.919932177490866,-3.539516667629656e+281,-1.127329219926809e-187],0,0],[[-1.1349630928255783e-207,-1.1559445604370315e+288,-3.57999533002613e+292],0,57.706151226316194],[[1.1966617966615715e+32,-1.308443002203369e+86,-6.664362743500172e-29],0,0],[[6.432750463800895e+170,-1.1888721424009163e-144,-1.7040442460095513e-75],0,0],[[-4.744869685397997e-163,1.1038900376070258e-272,1.1135903314955052e+244],0,59.73720740931781],[[8.192710157560433e-306,2.5216713222419557e+200,2.7861975952274327e-251],1,1.0],[[-2.265074770534004e+131,7.839670149925818e-278,-1.735573807040294e+70],0,0],[[-3.286716298820313e-41,-3.0870693428253524e+115,-1.6615507340775114e+268],0,59.05521258753139],[[-3.6366540230121064e+282,-4.5628330785036e-235,3.412298361507663e+104],0,0],[[3.4304207896824764e+78,-1.5862298780284405e+234,-3.5257614939229864e+45],0,1.0],[[1.1418903566588686e+202,3.057923656733621e+257,1.9635189108773308e+208],1,2.0],[[9.104095698506237e+247,-1.395378566558569e-155,-1.008849602168032e-147],0,0],[[1.5309364148291473e+20,3.009607083325416e-208,4.696040142948554e+202],0,60.45451216541414],[[-1.4929980720652086e+294,1.672328230858498e-214,-7.579010248497065e+83],0,0],[[3.603857068482743e+158,2.9731168912425227e+223,5.5230827984860495e-214],0,1.0],[[1.2569177198304213e+35,-1.396741088899253e-104,-1.2533180509137805e-282],0,0],[[0.056030027328489294,-1.6941667724887288e+108,1.3453300471233885e+129],0,1.0],[[8.548941388682517e-48,2.8670290078668156e+257,9.339975929055322e+155],0,60.98274136957115],[[-5.333959628058546e-35,-1.37284104484469e-193,9.19691126799929e+93],3,0],[[-2.7507146943094008e-114,-4.541303516304554e-153,2.6063194423749796e+134],0,61.17384117792451],[[-7.49044213263508e+291,-1.3788096112971466e-169,2.068929278551331e+156],0,0],[[-2.6265804345369346e+191,1.9899626460259247e-13,-9.596430455745706e+100],0,0],[[5.3364583166991444e+300,-3.088836913113676e+107,-4.497723396184308e+249],0,1.0],[[-2.0013485306413847e-258,3.307434389659611e+110,-80722015057.35544],0,61.948112167540074],[[5.0305259690686196e-231,1.1795612077485763e+52,-7.81439769323426e-309],0,0],[[4.1188846940311216e-171,1.1856484764854597e+269,-1.3692306833325666e-157],3,1.0],[[1.2500602811876808e+40,2.953363332574606e-238,-4.612923893847788e+233],0,59.95326148053716],[[1.6986948886824323e+126,2.0155846495512064e+173,-7.577132280246575e+93],0,0],[[-6.227793500436146e+292,1.0729156452384357e-137,-2.1995102488491374e+92],0,0],[[1.051973877170815e-298,-2.35103610402023e+214,-1.762241542725527e+256],0,59.43317937302809],[[-3.1275696969283374e-124,1.8331795202945072e-122,7.707961271807703e-168],0,0],[[4.142690958783731e-85,2.3636227077055366e+106,-1.2013940617586167e+160],0,60.94336737312885],[[1.170023224533326e-179,-2.647095342829477e-193,-7.384894716657131e+275],0,58.75043075221173],[[1.4462182673219785e-257,6.1701670079874715e-148,-3.4096344247463026e+169],0,60.84821815160063],[[-1.3672693428204055e+119,3.515536684928011e+206,-9.852495186821838e-109],0,0],[[9.581945296609061e+205,-8.171851610632133e-29,3.9211741729059833e+93],0,0],[[-7.207768437261981e+41,1.8636896603361692e+300,2.703480388506777e-207],0,0],[[6.763159401082614e-231,5.60029751695527e-74,-3.996639231722599e-250],0,0],[[-1.660792857124932e-193,1.0163117083670472e-178,1.2848677963582702e+197],0,60.52857576061055],[[3.716620345265454e+191,1.2808656209351454e-308,-8.261513904855362e+50],0,0],[[4.079715673979633e+117,-2.897784303481398e+193,-1.7680917188681742],0,0],[[-5.893156054960838e-209,-1.2838742763593962e-306,3.2540486993164457e+100],0,61.4307459360689],[[-1.3215125919708138e-66,-1.1348077011704342e-165,1.415228692978329e+55],3,0],[[2.8299772476719073e-248,-1.5516908711200715e+114,-1.5546063348868015e+175],0,60.788019299475785],[[-7.91477975257425e-178,1.0120915835571524e+263,2.9738216870275134e+189],0,60.62448515013275],[[1.534294812232018e+296,3.6432528648228024e-99,-1.078537986809811e+95],0,0],[[-5.971284384303698e-181,-1.165108214722553e+183,-3.131868129995754e-179],0,0],[[-4.893796482840715e-96,2.3933397594674356e+274,-1.065087959176633e-15],1,1.0]],"fresh-alts":["#<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)))))))>","#<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))) (* (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))))))>","#<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)))))))>"],"picked-error":15.425233162442431,"best-alt-per-point":[[[-7.097835734746746e+218,1.6219172946297815e+205,-5.707405484951641e+252],0,0],[[2.5842129352573833e+157,2.03476018732095e+119,2.3993845233584173e-107],0,1.0],[[-1.3908305214282044e-154,-2.4923117032686953e+197,-3.7981733760926524e-59],0,0],[[6.8367221822693645e+171,-2.485557599167403e+61,3.637969744290734e+272],0,0],[[3.6070289902878433e-298,2.4220868488775713e+174,-6.924414872876826e+121],0,61.27455062667296],[[-8.127295724709651e+188,1.4680641340515712e+37,2.130535351053153e+251],0,0],[[-6.59522455933465e-44,9.732025433837372e-298,4.3186153363237085e+196],0,60.534670692689666],[[4.717376995390811e-229,-2.3341562724578147e+138,-1.7808212315293658e-267],0,0],[[7.890896542811938e+189,-1.260155462227717e+139,-4.3402484094339546e-98],0,1.0],[[-2.1518590613428118e+57,-3.8472878924535176e-69,1.921602658997656e+224],0,60.12392332543967],[[-1.0752803839894087e-102,-2.4043032639901138e-220,7.317333208039203e-135],0,0],[[-3.5874867218821053e-289,6.639161457381533e+272,7.51766164914667e-83],0,62.340805957937846],[[1.2494134226790036e-90,5.2370439997769816e-251,-1.3732814838912222e+218],0,60.226141843328364],[[-147062523.161634,2.29835853317011e+39,3.8297412694520027e-72],0,0],[[-6.728931476030476e-220,-3.8960057277485095e+62,9.751429336071956e-111],0,0],[[3.4632829335752192e-251,-5.571648378152749e-24,-1.5013788162994641e-139],0,0],[[-2.647005178779469e+185,1.8598894186132259e+137,-3.3947387264781975e-158],0,0],[[2.9019277223709396e-286,-5.0486763504289305e+297,-2.2447560163594899e+161],0,60.93074969374858],[[5.463725192370479e+166,-3.3667834592100016e+22,-2.536436058187021e+276],0,0],[[1.2810755089251013e+75,9.138814505421974e-66,2.6556986431700894e-172],0,0],[[-2.8093867946453197,3.515792627928699e+199,9.597291263463799e+33],0,0],[[1.8150897130550793e+234,3.165542051316829e+57,1.579252672267158e+84],0,1.0],[[-7.8825607621194955e+93,1.1209809220161085e-271,-4.5883837368201683e+216],0,0],[[-3.255819812723566e-280,2.34479875841816e+59,5.702786507831075e+76],0,61.586896051932605],[[-1.7985967492432066e-181,-2.29441662020671e+209,-2.7064948575317953e+102],0,61.41741290190064],[[-5.456612900256313e-153,-1.6440819958925954e-123,8.045725952292009e+27],0,61.863218624207455],[[-3.267629569827715e-251,-8.654617709875635e-36,-5.243244850188282e+70],0,61.624065708565425],[[-1.2177356660474435e-254,7.810899588463585e-172,9.291488452698296e+167],0,60.86428026193053],[[-7.50461175805814e-258,-2.2074245476722926e-139,3.7649062113016876e-174],0,0],[[-2.831440759739633e+280,3.247555001847955e-09,-3.0357084245012946e-130],0,0],[[-6.590241440058156e+158,-3.600398183547405e+279,9.099484178294087e-276],0,0],[[-1.236864784914523e+307,-2.3539834087406223e+176,-1.1399021272637037e+283],0,0],[[1.2224178423718919e+201,-8.576640958071904e-118,-1.945904698138074e+294],0,0],[[-3.685865083311364e-22,3.264541092685341e+28,9.725416649719138e+252],0,59.520999571980504],[[-7.779967944948024e+102,-1.2524242674835265e-178,6.950896233858705e-22],0,0],[[-4.076760961819094e-307,-9.77225532658453e-187,4.4532169971988716e-248],0,0],[[-5.323110058228719e+306,1.1685596793963991e+198,-2.6353579322600854e+190],0,0],[[-1.9050852423101186e+177,3.272100701705269e+216,7.435874100938545e+127],0,0],[[1.7367008233662004e-146,3.241242127032787e+189,-1.8989429074771432e-61],0,0],[[-1.196163833446424e-216,-2.482218997015813e-79,-4.8603401847979466e+293],0,57.59925762427263],[[-7.885752610457983e-237,-1.8011585194123284e+244,1.710179159392655e-230],0,0],[[-4.865962690031574e-57,-9.009421056215597e-142,-5.6291122105439806e+206],0,60.3976604012631],[[-2.0273370129970457e+293,-3.089328922376561e+38,1.7761334469972786e+272],0,0],[[-6.458816293530837e+32,1.2314425699492343e+144,-4.391490797054204e-127],0,0],[[-1.3671559872942241e+32,1.7931450786375e+207,6.7889504343027e+141],0,0],[[3.717688415206528e-63,4.2329024975964494e-120,1.5110472870035968e-137],0,0],[[-3.071247325847018e+168,1.6394729264619353e-305,-2.427270407266838e-292],0,0],[[-2.2380108691988367e+176,-2.2804753660027636e-184,-417.84894784071446],0,0],[[1.273007442525311e+205,-860404.0745975035,9.790032000289722e-170],3,0],[[1.748601585802626e+143,-2.7501066713881833e-45,6.1586742802359446e+280],0,0],[[-7.693537982561176e+228,1.4196179692273589e+51,-1.816962027309807e-87],0,1.0],[[2.0434027565243845e+254,15210.1761529531,-2.7933732390832485e+50],0,1.0],[[-7.045510436190759e+250,3.865070822820752e-125,4.405711435557941e-18],0,0],[[6.86860201817031e+37,-3.6003931204734074e+177,2.9793076670648235e+135],0,0],[[-1.0747586880572918e-225,-3.914306845273933e+191,3.4461982003189476e-271],0,0],[[4.994366090310223e+293,2.9675638609500463e-266,8.497595544438243e+196],0,0],[[-2.4291085511930378e-57,3.7184381896827443e-109,9.342278142177427e-261],0,0],[[-1.9641025336330274e-36,1.5030419663802974e-174,-3.0809655420404695e-28],1,0],[[-2.439062442778655e-102,0.18720893918478226,-3.4986244195491495e-274],0,0],[[8.713457448965708e+55,1.3423233293291483e-162,1.7094985902294833e-299],0,0],[[-4.806258092707348e+97,-3.1666396733025884e-13,6.443766269775323e+116],0,0],[[-2.4346037043150295e+140,1.2878875837081438e-81,-1.2369049141682215e-238],0,0],[[-1.7508318798883553e+27,-1.626718674009136e+164,-2.303287936653167e+103],0,0],[[3.802507995980374e-176,-4.3021363265330954e+273,1.2952736416079913e-172],0,0],[[-1.654438597637836e+210,-4.5087835058803264e-119,-4.76358476622384e-40],0,0],[[-4.4587503598222035e-69,2.220662619570457e+252,-3.220071167646315e+167],0,60.869238566188756],[[-1.894259608196097e+90,3.61050150366864e+208,-4.4100791718387096e+222],0,0],[[9.426838129136436e+163,-2.3181506163130386e+81,4.678580995434083e-146],0,0],[[2.6773769570729964e-91,-3.685146484696044e-133,-6.601969142405229e+46],0,0],[[-2.267428170639853e+292,1.0258897434193047e+31,3.867922064222235e-78],0,0],[[6.811775981980025e+18,1.4782394318457476e-109,-5.609454405888344e-131],0,0],[[-1.9166323121487114e-233,-8.914664962649548e-28,6.125036550218122e+186],0,60.65675482516793],[[2.738458460650558e+50,1.2054688632397534e+33,-5.575910688006958e+201],0,0],[[-1.7060173400540982e-279,1.692419472494387e-152,-8.508186045528442e-232],0,0],[[3.496596375732988e-212,-1.7601344029867343e-290,-2.7467829813272228e+287],0,58.11261916665845],[[7.5963065745174464e-06,1.6348045764158446e-257,-4.607089829824939e-06],0,0],[[4.821955799677156e-289,-2.3184172477948065e+196,1.7483065599934842e+85],0,61.53308646175488],[[-1.0057412795601501e-141,0.060556571647326925,1.8480052807692756e-77],0,0],[[8.452451609890028e+85,3.450903835999846e-213,4.495110039324184e-82],0,0],[[-1.3252476549554923e-172,-1.2400400292246446e+273,-2.099587820327233e-176],2,0],[[-1.753002269819775e+157,2.229461735274287e-223,-5.461310186136003e+131],0,0],[[-1.265259404413343e-89,-1.0963427561332458e-156,5.741222418922647e-41],0,0],[[7.0181404927126106e+305,-1.1560520854064811e-178,3.6484688752466967e-69],0,0],[[-3.312607218501177e+276,5.094611782176626e-183,-3.6242962787554164e+165],0,0],[[-1.0064448966798171e+198,-4.253682617948995e-243,-1.6600604267765295e-45],0,0],[[-1.2261367936338352e-64,9.383817895669287e-283,3.611278323934413e-94],0,0],[[1.6564415223201099e+136,-6.991593686636276e+190,-6.602809642561733e-223],0,0],[[-4.485222205559527e+248,1.4448618247603424e-257,3.706054342154294e-129],0,0],[[7.195448856340728e-141,3384824.3314616154,-4.510161549039838e-214],3,0],[[-9.543517271590036e+203,2.6544319953421338e+293,1.1509772202461854e+130],0,0],[[7.876423561266471e+22,-5.7183056168804695e+262,2.809919074811328e-300],5,0],[[2.1859104172563636e-264,-1.6313740517107182e-227,-7.512222795104406e-168],0,0],[[-82504272040715.1,9.260475542482052e+299,-2.191896168863437e-98],5,0],[[-1.9194647450105577e+144,-5.02014609669523e+254,-3.3925149777052834e-63],0,0],[[8.359355849775862e-16,1.3310146389530143e+163,-1.3274409717698955e-301],0,0],[[-7.543647802930883e-65,4.6811315760090616e-144,2.043780925156358e+88],0,0],[[-1.3285899852668203e+268,-2.1307490533826745e+196,-2.6253419032181803e+196],0,0],[[1.046624167704608e-163,3.4631943627882644e+200,-1.3964572346787755e-152],4,0],[[-7.807986006964459e-172,4.648142651511719e+239,-4.519595929536516e-229],0,0],[[-1.3448163575524206e-16,-1.423542426143039e-129,-2.969699723262003e+31],0,0],[[5.903833024524204e-224,-5.866052212830613e+219,-2.0449888976508749e+136],0,61.157957079708986],[[6.75061600976492e-09,-6.990575505691825e-293,-2.097700040267997e+32],0,0],[[-1.0183335489303076e-199,-2.2046896841875876e+105,4.0526523047213233e+244],0,59.72462417842582],[[-4.630105582658964e+112,1.5043274345617834e+228,-231.6086328505263],0,0],[[-16083688965753228.0,-2.915269426177489e-188,-1.1146873205045003e+50],0,0],[[9.861253466270416e+140,6.509917256919526e-155,-1.235130140170164e-126],0,0],[[2.0740305822111617e-302,2.156659933698441e+65,-7.1479705794644704e+252],0,59.5239545806469],[[-3.7138781240413885e-204,-7.263550849085613e-27,5.582278109308679e-72],0,0],[[-9.324073911343234e-97,1.329109205730971e+18,2.480190476546545e-246],0,0],[[7.542398567020551e-205,3.211003609332114e-292,-2.9988557709871706e-297],0,0],[[-3.841622556722524e-66,4.607613593823294e-213,1.705817703400908e+63],0,0],[[-1.1204577574966285e-246,-4.921050894675189e-140,2.0974429565133816e-215],0,0],[[-8.048358363486665e+120,8.530068169212586e+207,2.905639146095198e+214],0,0],[[-9.958023069471933e+213,3.554023312793441e+160,1.51646550817889e-257],3,0],[[-0.0007363022252445651,-1.7841118844999841e+249,9.88160538195634e+236],0,59.88743993573152],[[-5.624997011130711e-126,2.3719183352628996e+212,-1.9742436392168267e+216],0,60.255350889881406],[[-1.0155994341356255e+111,1.1988791635038015e-56,-171.37335414723813],0,0],[[-1.7491621663626818e+238,-4.226402616530443e+259,3.50550012204851e-33],0,0],[[-7.497175243828372e+204,1.708686197016133e+79,-3.1472164561505567e-59],0,0],[[-8.05737758242569e-91,1.0057242501199301e-254,-3.222264666704597e-210],0,0],[[1.099315532911349e-23,-2.4132101870415246e+120,-7.586221492885147e-139],0,0],[[-358605196789223.75,1.4540832115601766e+80,-4.5561147022013495e+203],0,60.441063559764686],[[3.224104279734413e-128,3.8655618297451507e+264,-6.394924897500658e-104],0,0],[[-4.266935350404457e+257,-4.095681815309281e+187,6.029252458259788e+248],0,1.0],[[-1.3489282606511781e-35,2.45682697544046e-235,-1.7051167618207031e+156],0,60.98017647400547],[[-3.448018665551091e+46,4.65318267035879e+212,1.7198556401156944e+40],0,0],[[-2.868627256931542e+282,-2.532452753214596e+217,-1.0726845205664223e-63],0,0],[[-3.2017078238224426e+292,-7.4224082205270185e+121,5.394314721089183e-302],0,0],[[-3.023055730501428e-23,-1.175878359064847e-77,-3.9529958064865946e-264],0,0],[[3.6553350706241625e-209,5.073224629669749e-209,-1.2641746276125557e-259],0,0],[[-6.168869222825437e-92,-4.977701482488331e-274,2.2777945340735493e-276],0,0],[[-3.5687398900842987e+52,-8.51976038766166e+293,1.0871440614151498e+289],0,57.997392776194935],[[-1.4372534866880888e+234,4.876905254991102e+285,1.2894750780678564e+300],2,0],[[-1.6235425325048555e+261,1.4618355052890434e+227,3.043685036732137e-200],0,1.0],[[1.4920285944075702e-53,-1.738586776813829e-222,7.628653541085044e+123],0,61.258701434077615],[[4.493452818771822e-125,-1.980605354536306e-231,1.4342996382753786e-68],0,0],[[1.0963301159009184e-183,3.231394614843413e+95,-5.8891022224162905e+299],0,56.81973218624375],[[-171636426038343.06,8.895467702359268e-17,-9.062606466177737e-237],0,0],[[-4.005659624811191e+200,-18632706462072732.0,-4.1068770028392473e+21],0,0],[[-1.3688696209191408e-102,-2.0036982767287855e-282,7.084339583278926e+216],0,60.24657717169728],[[3.879381526714617e+231,-4.612024538520277e+39,1.1166277726761266e+39],0,0],[[-1.7089084754270419e-12,-1.469508077318514e+98,1.8687286825225081e+205],0,60.41843201467783],[[-9.164501627196514e-190,-5.450210145640886e-309,-2.8266439589935105e+168],0,60.859541086901274],[[2.8321391439452527e-177,1.0865881933967427e-239,1.0321884324238089e-204],0,0],[[-6.605881759005181e+183,2.194953362823915e+177,-4.99895221232182e+182],1,0],[[1.3687884379108643e+17,3.468363920687483e-275,9.235058182301351e-298],0,0],[[-1.0915024824878794e+32,1.3508330812519037e-42,-7.643304163425191e-132],0,0],[[3.258549790458107e-45,2.1316535898912934e-76,-5.329618293165233e+254],0,59.474631968114856],[[2.2420303907903802e-68,-4.147815060644267e-269,-1.5885079051767335e-90],0,0],[[-3.969894456140893e-15,-1.317053669789009e+53,5.776745162887772e-81],0,0],[[2.3939618552975763e+242,-4.127632732628039e+21,3.161587187966589e+82],0,0],[[3.2633957345317127e+251,2.0474783165414538e-126,-1.8675181824308287e+123],0,0],[[5.5609724703152094e-123,-9.698832524909335e+106,4.871284163370267e-185],0,0],[[1.9117791443554203e-134,-1.1788306068444453e-175,-7.2672182309421e-153],0,0],[[788647938.445347,-5.600514306056783e-289,-3.4507996665333636e-44],0,0],[[7.4751406322111975e-208,7.348751680152543e-306,5.656765710936691e-76],0,0],[[1.961831527193424e-60,-1.0262805742626176e-88,7.655606647706524e-307],0,0],[[-3.4535699470035837e-158,1.027405627074826e+260,-1.0089466879026102e-120],0,0],[[-8.150217400699526e-187,-1.081567422425548e+106,-7.328272485377685e-51],0,0],[[-5.600850699676017e-216,-4.569457869050411e-204,3.981491076325477e+229],0,60.02988735115003],[[-5.201902814304858e+287,-8.370936497660456e+147,1.6703871447091801e-184],0,0],[[3.294798454877577e-109,-1.1634672830494242e+297,5.873882793788073e+304],0,55.54370003871646],[[-2.5842611121723686e-83,1.9827401749271262e+183,2.468160393597418e+16],0,0],[[-4.3156972913392805e-297,2.339761031458555e-169,3.943485742551043e+214],0,60.28155775404954],[[8.23935440322281e-255,-6.993566496172953e-149,1.2414218620136766e+210],0,60.34922351850937],[[-1.8008197600788473e-210,-9.339382943714191e+219,-1.9724572392550013e+269],0,59.01688122601553],[[4.2958727261014584e+36,6.328184874755262e+301,1.7255846811749406e-291],0,1.0],[[-2.8873539429251243e+113,9.723806270790304e+261,3.669186107808967e-292],0,0],[[1.4160598314001593e+222,7.17939675829627e-158,5.706174991628051e-294],0,0],[[-8.833333360285963e+123,1.6543220134558954e+211,-2.0075913201092103e-110],0,0],[[-5.799494962865382e+179,-1.9221933359897497e-164,-4.223847889069915e-247],0,0],[[-7.412818439865646e+79,-1.1943364123385422e-44,-2.891150086994789e-239],0,0],[[7.759258852634933e-78,20833.64667003459,2.4398615081868066e+205],0,60.41694135189651],[[-1.242717444963877e+43,2.3948670500504287e-261,6.2092037474963055e+231],0,59.98868627570155],[[2.3255349808732236e+289,-1.1280084353956664e-216,-8.464143987770504e+171],0,0],[[-2.0051342910565085e+265,6.413626161349299e-227,560488966.1174189],0,0],[[2.0882744776400718e-286,-1.930574277247469e-202,1.751208589172235e-52],0,62.22394337671404],[[2.9688880181416084,-2.3040207927157378e-96,-6.579373556970536e-52],0,0],[[-4.194881103238641e+21,9.475383647572687e+150,-4.825887791830381e+144],0,0],[[1.5628986347380075e+167,8.340556674905215e+77,-3.6999440436536584e-49],0,0],[[7.077452111412406e-295,3.966194599780254e-223,3.7838902349270595e+124],0,61.25316496124588],[[4.700763524863875e+204,-2.9207329416306686e+217,1.3073288890631414e+280],0,0],[[-7.693815148540151e+114,3.2964836323184035e-155,-5.3525540351311954e-281],0,0],[[8.40015631920143e-267,5.7735379314244544e+135,-2.6804016066367006e-31],0,62.136530907271094],[[1.3086604894940812e-227,5.110728256051039e-260,-2.2230057586741136e-141],0,0],[[5.996749315117597e+34,-2.0470315990098174e-13,-3.551599710870501e-79],0,0],[[-1.3512698516924462e+222,4.5201803639304495e+192,3.8910566195656857e-199],0,1.0],[[-3.0811702649623344e-274,2.3443867491657545e+246,-6.131456919104946e-248],0,0],[[-8.64483328785185e-272,2.6015556795165393e-281,3.569525897033803e-203],0,0],[[-3.696014574690946e+253,-6.234818190089148e-22,1.0433422764871603e+92],0,0],[[2.911945305258545e+76,1.607081485572248e+287,3.0951906535851436e+156],0,0],[[-2.304902569428671e-278,4.842080607450392e+183,-1.3710886835561032e-37],0,62.16307349980139],[[-3.0626399470140506e+19,1.9567613186327648e-98,1.3180753941144182e-147],0,0],[[-7.302755623144034e-92,2.034142710886352e+76,2.645632745156305e+72],0,61.61379429787259],[[-1.64305460819134e+147,-1.925191351645937e-38,5.916620005010986e-284],0,0],[[1.1331561154624403e-183,3.1554708951547898e+299,-2.1365439373622427e-112],0,0],[[3.710994234954979e+213,3.820878202523467e-296,1.7176479621738321e-282],0,0],[[4.1035311994183654e+275,2.1154012951226925e+268,-1.1203373459545064e-225],0,0],[[-1.1644934250212247e+195,-1.778006036463959e-243,1.4447268620911757e-89],0,0],[[1.0420632008764305e-255,-6.647381994040776e+28,7.492863265092149e+193],0,60.56975525027214],[[-2.22550224200597e-215,-4.4202281498453134e-210,-2.7561614443533105e+307],0,53.47169079070351],[[2.1023881259435715e-142,1.2286041871551853e+305,-7.250968489147593e+121],0,61.27436649836295],[[6.890711381796581e-252,-7.546945266760574e-90,-2.69825319383642e-133],0,0],[[1.677162052730813e-59,8.686388033007487e-215,-1.3149636586628956e+118],0,61.303087464099775],[[-6.201577640216828e-76,-2.9590397071500346e+28,-4.926806733013528e-158],0,0],[[-5.170525455803253e+144,3.4859445720092225e-35,4.821982933878669e+175],0,0],[[-1.1185816621821212e-94,4.344638216165875e-288,-1.7812260516570316e-155],0,0],[[1.187362624897409e+112,-3.4014587503013307e-66,-5.491335421336957e+149],2,0],[[6.919932177490866,-3.539516667629656e+281,-1.127329219926809e-187],0,0],[[-1.1349630928255783e-207,-1.1559445604370315e+288,-3.57999533002613e+292],0,57.706151226316194],[[1.1966617966615715e+32,-1.308443002203369e+86,-6.664362743500172e-29],0,0],[[6.432750463800895e+170,-1.1888721424009163e-144,-1.7040442460095513e-75],0,0],[[-4.744869685397997e-163,1.1038900376070258e-272,1.1135903314955052e+244],0,59.73720740931781],[[8.192710157560433e-306,2.5216713222419557e+200,2.7861975952274327e-251],0,0],[[-2.265074770534004e+131,7.839670149925818e-278,-1.735573807040294e+70],0,0],[[-3.286716298820313e-41,-3.0870693428253524e+115,-1.6615507340775114e+268],0,59.05521258753139],[[-3.6366540230121064e+282,-4.5628330785036e-235,3.412298361507663e+104],0,0],[[3.4304207896824764e+78,-1.5862298780284405e+234,-3.5257614939229864e+45],0,1.0],[[1.1418903566588686e+202,3.057923656733621e+257,1.9635189108773308e+208],2,0],[[9.104095698506237e+247,-1.395378566558569e-155,-1.008849602168032e-147],0,0],[[1.5309364148291473e+20,3.009607083325416e-208,4.696040142948554e+202],0,60.45451216541414],[[-1.4929980720652086e+294,1.672328230858498e-214,-7.579010248497065e+83],0,0],[[3.603857068482743e+158,2.9731168912425227e+223,5.5230827984860495e-214],0,1.0],[[1.2569177198304213e+35,-1.396741088899253e-104,-1.2533180509137805e-282],0,0],[[0.056030027328489294,-1.6941667724887288e+108,1.3453300471233885e+129],0,0],[[8.548941388682517e-48,2.8670290078668156e+257,9.339975929055322e+155],0,60.98274136957115],[[-5.333959628058546e-35,-1.37284104484469e-193,9.19691126799929e+93],0,0],[[-2.7507146943094008e-114,-4.541303516304554e-153,2.6063194423749796e+134],0,61.17384117792451],[[-7.49044213263508e+291,-1.3788096112971466e-169,2.068929278551331e+156],0,0],[[-2.6265804345369346e+191,1.9899626460259247e-13,-9.596430455745706e+100],0,0],[[5.3364583166991444e+300,-3.088836913113676e+107,-4.497723396184308e+249],0,1.0],[[-2.0013485306413847e-258,3.307434389659611e+110,-80722015057.35544],0,61.948112167540074],[[5.0305259690686196e-231,1.1795612077485763e+52,-7.81439769323426e-309],0,0],[[4.1188846940311216e-171,1.1856484764854597e+269,-1.3692306833325666e-157],0,0],[[1.2500602811876808e+40,2.953363332574606e-238,-4.612923893847788e+233],0,59.95326148053716],[[1.6986948886824323e+126,2.0155846495512064e+173,-7.577132280246575e+93],0,0],[[-6.227793500436146e+292,1.0729156452384357e-137,-2.1995102488491374e+92],0,0],[[1.051973877170815e-298,-2.35103610402023e+214,-1.762241542725527e+256],0,59.43317937302809],[[-3.1275696969283374e-124,1.8331795202945072e-122,7.707961271807703e-168],0,0],[[4.142690958783731e-85,2.3636227077055366e+106,-1.2013940617586167e+160],0,60.94336737312885],[[1.170023224533326e-179,-2.647095342829477e-193,-7.384894716657131e+275],0,58.75043075221173],[[1.4462182673219785e-257,6.1701670079874715e-148,-3.4096344247463026e+169],0,60.84821815160063],[[-1.3672693428204055e+119,3.515536684928011e+206,-9.852495186821838e-109],0,0],[[9.581945296609061e+205,-8.171851610632133e-29,3.9211741729059833e+93],0,0],[[-7.207768437261981e+41,1.8636896603361692e+300,2.703480388506777e-207],0,0],[[6.763159401082614e-231,5.60029751695527e-74,-3.996639231722599e-250],0,0],[[-1.660792857124932e-193,1.0163117083670472e-178,1.2848677963582702e+197],0,60.52857576061055],[[3.716620345265454e+191,1.2808656209351454e-308,-8.261513904855362e+50],0,0],[[4.079715673979633e+117,-2.897784303481398e+193,-1.7680917188681742],0,0],[[-5.893156054960838e-209,-1.2838742763593962e-306,3.2540486993164457e+100],0,61.4307459360689],[[-1.3215125919708138e-66,-1.1348077011704342e-165,1.415228692978329e+55],0,0],[[2.8299772476719073e-248,-1.5516908711200715e+114,-1.5546063348868015e+175],0,60.788019299475785],[[-7.91477975257425e-178,1.0120915835571524e+263,2.9738216870275134e+189],0,60.62448515013275],[[1.534294812232018e+296,3.6432528648228024e-99,-1.078537986809811e+95],0,0],[[-5.971284384303698e-181,-1.165108214722553e+183,-3.131868129995754e-179],0,0],[[-4.893796482840715e-96,2.3933397594674356e+274,-1.065087959176633e-15],0,0]],"picked":"(λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))"}* * * * [misc]pick:  Picked  #<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))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 1 2 2)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 1 2 1)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 2 1)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))) into (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) (+ (* (/ (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (+ 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 (/ (+ (* -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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) in J
* [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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 (/ 1 K))))) (log (/ 1 J))) (log (/ 1 U))))) 1)) 1/3) into (pow (sqrt (+ 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) in J
* [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 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 J
* [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 (+ 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- 0) into 0
* [misc]backup-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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1 (- J))) (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))))) (log (/ 1 (- U)))))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3)
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2 1 2 2)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))) into (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) (+ (* (/ (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (+ 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 (/ (+ (* -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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) in J
* [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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 (/ 1 K))))) (log (/ 1 J))) (log (/ 1 U))))) 1)) 1/3) into (pow (sqrt (+ 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) in J
* [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 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 J
* [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 (+ 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- 0) into 0
* [misc]backup-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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1 (- J))) (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))))) (log (/ 1 (- U)))))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3)
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 1 2 1)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))) into (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) (+ (* (/ (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (+ 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 (/ (+ (* -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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) in J
* [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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 (/ 1 K))))) (log (/ 1 J))) (log (/ 1 U))))) 1)) 1/3) into (pow (sqrt (+ 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) in J
* [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 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 J
* [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 (+ 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- 0) into 0
* [misc]backup-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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1 (- J))) (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))))) (log (/ 1 (- U)))))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3)
* * * * [misc]progress:  [ 4 / 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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (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 (+ 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 (/ (+ (* -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 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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 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 (+ (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 (- (+ (* 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 (+ (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]backup-simplify:  Simplify 0 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 (+ (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 (- (+ (* 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 (+ (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 (- (+ (* 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 (+ (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]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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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]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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ 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 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 J
* [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 (+ 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 (- 0) into 0
* [misc]backup-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 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 (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)))>
* * * * [misc]progress:  [ 2 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (pow (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1)))>
* * * * [misc]progress:  [ 3 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (exp (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (log (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 (log (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 4 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (log (exp (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 5 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (cbrt (* (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 (cbrt (* (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)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 6 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (106 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (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:  [ 7 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (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))))
* [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:  [ 8 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt 1)) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt 1))
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt 1))
* [exit]simplify:  Simplified to (cbrt (sqrt 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 9 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (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))))
* [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:  [ 10 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt 1) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (cbrt 1)
* [exit]simplify:  Simplified to (cbrt 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 11 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (/ (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (204 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]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 (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 12 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (/ (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (194 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 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 (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 (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 13 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (* (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]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 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 14 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (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))))) (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 (47 enodes)
* * [misc]simplify:  iters left: 3 (107 enodes)
* * [misc]simplify:  iters left: 2 (332 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:  [ 15 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (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:  [ 16 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* 1 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 17 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 18 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (pow (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 19 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (exp (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (log (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 (log (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (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) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (log (exp (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 21 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cbrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (cbrt (* (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 (cbrt (* (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)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 22 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (106 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (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:  [ 23 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (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))))
* [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:  [ 24 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cbrt (sqrt 1)) (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))
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt 1))
* [exit]simplify:  Simplified to (cbrt (sqrt 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 25 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (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))))
* [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:  [ 26 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cbrt 1) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (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 (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 27 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (/ (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (204 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]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 (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 28 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (/ (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (194 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 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 (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 (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 29 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (* (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 30 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [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))))) (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 (47 enodes)
* * [misc]simplify:  iters left: 3 (107 enodes)
* * [misc]simplify:  iters left: 2 (332 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:  [ 31 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (sqrt (cbrt (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))))))>
* [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:  [ 32 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* 1 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 33 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 34 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (pow (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 35 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (exp (log (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 (log (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 (log (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 36 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (log (exp (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 (exp (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 (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 37 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (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 (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (cbrt (* (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 (cbrt (* (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)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 38 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (106 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (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:  [ 39 / 74 ] 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 (+ 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 (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))))
* [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:  [ 40 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt 1)) (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))
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt 1))
* [exit]simplify:  Simplified to (cbrt (sqrt 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 41 / 74 ] 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 (+ 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 (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))))
* [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:  [ 42 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt 1) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (cbrt 1)
* [exit]simplify:  Simplified to (cbrt 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 43 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (/ (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (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 (+ (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 (204 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]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 (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 44 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (/ (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (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 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 (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 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 (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 (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 45 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (* (* (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (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 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 46 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [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))))) (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 (47 enodes)
* * [misc]simplify:  iters left: 3 (107 enodes)
* * [misc]simplify:  iters left: 2 (332 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:  [ 47 / 74 ] 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 (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 (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:  [ 48 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (* 1 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 49 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2))))>
* * * * [misc]progress:  [ 50 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1))))>
* * * * [misc]progress:  [ 51 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 52 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (exp (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 53 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 54 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (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 (135 enodes)
* [exit]simplify:  Simplified to (* (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1) (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)))) 1) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 55 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (sqrt (* (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 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 56 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (sqrt (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 57 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (sqrt 1) (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 (326 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:  [ 58 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (/ (sqrt (+ (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 (214 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3))))
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ 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 (333 enodes)
* [exit]simplify:  Simplified to (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 (- (pow (/ (/ U (* J 2)) (cos (/ K 2))) (+ 3 1)) (- (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 59 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (/ (sqrt (- (* 1 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 (190 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* J 2)) (cos (/ K 2))) (+ 3 1))))
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* J 2)) (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 (482 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 60 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (sqrt (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (sqrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 61 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 62 / 74 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 63 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)))>
* [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)))))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3))
* * [misc]simplify:  iters left: 6 (32 enodes)
* * [misc]simplify:  iters left: 5 (63 enodes)
* * [misc]simplify:  iters left: 4 (152 enodes)
* * [misc]simplify:  iters left: 3 (406 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))) (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ 1 (* (/ (* U 1/2) J) (/ (* U 1/2) J))))))))
* * * * [misc]progress:  [ 64 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))) 1/3)))>
* [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)))))) (pow (sqrt (+ 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 (79 enodes)
* * [misc]simplify:  iters left: 4 (190 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ 1 (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U))))))) (* (* (* J -2) (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))) (* (cos (/ K 2)) (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))))))
* * * * [misc]progress:  [ 65 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3)))>
* [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)))))) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3))
* * [misc]simplify:  iters left: 6 (38 enodes)
* * [misc]simplify:  iters left: 5 (78 enodes)
* * [misc]simplify:  iters left: 4 (189 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (* J -2)) (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)))) (cbrt (sqrt (+ (pow (exp 2) (+ (- (log (/ -1 J)) (log (/ -1 U))) (log (/ 1/2 (cos (* K 1/2)))))) 1))))
* * * * [misc]progress:  [ 66 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3))) (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)))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3))) (cbrt (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 (157 enodes)
* * [misc]simplify:  iters left: 3 (423 enodes)
* [exit]simplify:  Simplified to (* (* (* (cbrt (sqrt (+ 1 (* (* (/ U J) 1/2) (* (/ U J) 1/2))))) (* (cos (/ K 2)) J)) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* -2 (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 67 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))) 1/3))) (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)))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))) 1/3))) (cbrt (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 (195 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ 1 (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U))))))) (* (* (* J -2) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (* (cos (/ K 2)) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))))
* * * * [misc]progress:  [ 68 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3))) (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)))) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3))) (cbrt (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 (194 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (pow (exp 2) (+ (- (log (/ -1 J)) (log (/ -1 U))) (log (/ 1/2 (cos (* 1/2 K)))))) 1))) (* (* (* (cos (/ K 2)) (* J -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:  [ 69 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3) (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))) (* (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3) (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 (32 enodes)
* * [misc]simplify:  iters left: 5 (64 enodes)
* * [misc]simplify:  iters left: 4 (157 enodes)
* * [misc]simplify:  iters left: 3 (427 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* J (cbrt (sqrt (+ (* (/ (* 1/2 U) J) (/ (* 1/2 U) J)) 1))))) (* (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) -2)))
* * * * [misc]progress:  [ 70 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (pow (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))) 1/3) (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))) (* (pow (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))) 1/3) (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 (37 enodes)
* * [misc]simplify:  iters left: 5 (80 enodes)
* * [misc]simplify:  iters left: 4 (195 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))) (* (cos (/ K 2)) (* J -2)))) (cbrt (sqrt (+ (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U)))) 1))))
* * * * [misc]progress:  [ 71 / 74 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3) (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))) (* (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3) (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 (38 enodes)
* * [misc]simplify:  iters left: 5 (79 enodes)
* * [misc]simplify:  iters left: 4 (194 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* J -2)))) (cbrt (sqrt (+ (pow (exp 2) (+ (log (/ 1/2 (cos (* 1/2 K)))) (- (log (/ -1 J)) (log (/ -1 U))))) 1))))
* * * * [misc]progress:  [ 72 / 74 ] simplifiying candidate #<alt-event (λ (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 (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))))>
* [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)))))) (cbrt (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* * [misc]simplify:  iters left: 6 (31 enodes)
* * [misc]simplify:  iters left: 5 (61 enodes)
* * [misc]simplify:  iters left: 4 (150 enodes)
* * [misc]simplify:  iters left: 3 (404 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (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))) (* (cos (/ K 2)) (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 73 / 74 ] simplifiying candidate #<alt-event (λ (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 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))))))>
* [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)))))) (cbrt (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 (77 enodes)
* * [misc]simplify:  iters left: 4 (188 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ 1 (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U))))))) (* (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))))
* * * * [misc]progress:  [ 74 / 74 ] simplifiying candidate #<alt-event (λ (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 (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)))))>
* [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)))))) (cbrt (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1))))
* * [misc]simplify:  iters left: 6 (37 enodes)
* * [misc]simplify:  iters left: 5 (76 enodes)
* * [misc]simplify:  iters left: 4 (187 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (pow (exp 2) (+ (- (log (/ -1 J)) (log (/ -1 U))) (log (/ 1/2 (cos (* K 1/2)))))) 1))) (* (* (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)))) (* (cos (/ K 2)) (* J -2))))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 4 / 4
* * * [misc]progress:  picking best candidate
"ALT DATA: "{"all-alts":["#<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) (* (* (* -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)))))))>","#<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) (* (* (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))) (* (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))))))>","#<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)))))))>"],"best-fresh-alt-per-point":[[[-7.097835734746746e+218,1.6219172946297815e+205,-5.707405484951641e+252],0,0],[[2.5842129352573833e+157,2.03476018732095e+119,2.3993845233584173e-107],0,1.0],[[-1.3908305214282044e-154,-2.4923117032686953e+197,-3.7981733760926524e-59],0,0],[[6.8367221822693645e+171,-2.485557599167403e+61,3.637969744290734e+272],0,0],[[3.6070289902878433e-298,2.4220868488775713e+174,-6.924414872876826e+121],0,61.27455062667296],[[-8.127295724709651e+188,1.4680641340515712e+37,2.130535351053153e+251],0,1.5849625007211563],[[-6.59522455933465e-44,9.732025433837372e-298,4.3186153363237085e+196],0,60.534670692689666],[[4.717376995390811e-229,-2.3341562724578147e+138,-1.7808212315293658e-267],0,0],[[7.890896542811938e+189,-1.260155462227717e+139,-4.3402484094339546e-98],0,1.0],[[-2.1518590613428118e+57,-3.8472878924535176e-69,1.921602658997656e+224],0,60.12392332543967],[[-1.0752803839894087e-102,-2.4043032639901138e-220,7.317333208039203e-135],0,0],[[-3.5874867218821053e-289,6.639161457381533e+272,7.51766164914667e-83],0,62.340805957937846],[[1.2494134226790036e-90,5.2370439997769816e-251,-1.3732814838912222e+218],0,60.226141843328364],[[-147062523.161634,2.29835853317011e+39,3.8297412694520027e-72],0,0],[[-6.728931476030476e-220,-3.8960057277485095e+62,9.751429336071956e-111],2,0],[[3.4632829335752192e-251,-5.571648378152749e-24,-1.5013788162994641e-139],0,1.0],[[-2.647005178779469e+185,1.8598894186132259e+137,-3.3947387264781975e-158],0,0],[[2.9019277223709396e-286,-5.0486763504289305e+297,-2.2447560163594899e+161],0,60.93074969374858],[[5.463725192370479e+166,-3.3667834592100016e+22,-2.536436058187021e+276],2,0],[[1.2810755089251013e+75,9.138814505421974e-66,2.6556986431700894e-172],0,0],[[-2.8093867946453197,3.515792627928699e+199,9.597291263463799e+33],1,1.0],[[1.8150897130550793e+234,3.165542051316829e+57,1.579252672267158e+84],0,1.0],[[-7.8825607621194955e+93,1.1209809220161085e-271,-4.5883837368201683e+216],1,1.0],[[-3.255819812723566e-280,2.34479875841816e+59,5.702786507831075e+76],0,61.586896051932605],[[-1.7985967492432066e-181,-2.29441662020671e+209,-2.7064948575317953e+102],0,61.41741290190064],[[-5.456612900256313e-153,-1.6440819958925954e-123,8.045725952292009e+27],0,61.863218624207455],[[-3.267629569827715e-251,-8.654617709875635e-36,-5.243244850188282e+70],0,61.624065708565425],[[-1.2177356660474435e-254,7.810899588463585e-172,9.291488452698296e+167],0,60.86428026193053],[[-7.50461175805814e-258,-2.2074245476722926e-139,3.7649062113016876e-174],2,1.0],[[-2.831440759739633e+280,3.247555001847955e-09,-3.0357084245012946e-130],0,0],[[-6.590241440058156e+158,-3.600398183547405e+279,9.099484178294087e-276],0,0],[[-1.236864784914523e+307,-2.3539834087406223e+176,-1.1399021272637037e+283],0,0],[[1.2224178423718919e+201,-8.576640958071904e-118,-1.945904698138074e+294],0,1.0],[[-3.685865083311364e-22,3.264541092685341e+28,9.725416649719138e+252],0,59.520999571980504],[[-7.779967944948024e+102,-1.2524242674835265e-178,6.950896233858705e-22],0,0],[[-4.076760961819094e-307,-9.77225532658453e-187,4.4532169971988716e-248],0,0],[[-5.323110058228719e+306,1.1685596793963991e+198,-2.6353579322600854e+190],0,0],[[-1.9050852423101186e+177,3.272100701705269e+216,7.435874100938545e+127],0,0],[[1.7367008233662004e-146,3.241242127032787e+189,-1.8989429074771432e-61],1,0],[[-1.196163833446424e-216,-2.482218997015813e-79,-4.8603401847979466e+293],0,57.59925762427263],[[-7.885752610457983e-237,-1.8011585194123284e+244,1.710179159392655e-230],1,0],[[-4.865962690031574e-57,-9.009421056215597e-142,-5.6291122105439806e+206],0,60.3976604012631],[[-2.0273370129970457e+293,-3.089328922376561e+38,1.7761334469972786e+272],0,0],[[-6.458816293530837e+32,1.2314425699492343e+144,-4.391490797054204e-127],0,0],[[-1.3671559872942241e+32,1.7931450786375e+207,6.7889504343027e+141],2,0],[[3.717688415206528e-63,4.2329024975964494e-120,1.5110472870035968e-137],0,0],[[-3.071247325847018e+168,1.6394729264619353e-305,-2.427270407266838e-292],0,0],[[-2.2380108691988367e+176,-2.2804753660027636e-184,-417.84894784071446],0,0],[[1.273007442525311e+205,-860404.0745975035,9.790032000289722e-170],1,0],[[1.748601585802626e+143,-2.7501066713881833e-45,6.1586742802359446e+280],0,1.5849625007211563],[[-7.693537982561176e+228,1.4196179692273589e+51,-1.816962027309807e-87],0,1.0],[[2.0434027565243845e+254,15210.1761529531,-2.7933732390832485e+50],0,1.0],[[-7.045510436190759e+250,3.865070822820752e-125,4.405711435557941e-18],0,0],[[6.86860201817031e+37,-3.6003931204734074e+177,2.9793076670648235e+135],1,0],[[-1.0747586880572918e-225,-3.914306845273933e+191,3.4461982003189476e-271],0,0],[[4.994366090310223e+293,2.9675638609500463e-266,8.497595544438243e+196],0,0],[[-2.4291085511930378e-57,3.7184381896827443e-109,9.342278142177427e-261],0,0],[[-1.9641025336330274e-36,1.5030419663802974e-174,-3.0809655420404695e-28],0,0],[[-2.439062442778655e-102,0.18720893918478226,-3.4986244195491495e-274],0,0],[[8.713457448965708e+55,1.3423233293291483e-162,1.7094985902294833e-299],0,0],[[-4.806258092707348e+97,-3.1666396733025884e-13,6.443766269775323e+116],2,0],[[-2.4346037043150295e+140,1.2878875837081438e-81,-1.2369049141682215e-238],0,0],[[-1.7508318798883553e+27,-1.626718674009136e+164,-2.303287936653167e+103],0,0],[[3.802507995980374e-176,-4.3021363265330954e+273,1.2952736416079913e-172],0,1.0],[[-1.654438597637836e+210,-4.5087835058803264e-119,-4.76358476622384e-40],0,0],[[-4.4587503598222035e-69,2.220662619570457e+252,-3.220071167646315e+167],0,60.869238566188756],[[-1.894259608196097e+90,3.61050150366864e+208,-4.4100791718387096e+222],0,0],[[9.426838129136436e+163,-2.3181506163130386e+81,4.678580995434083e-146],0,0],[[2.6773769570729964e-91,-3.685146484696044e-133,-6.601969142405229e+46],0,1.5849625007211563],[[-2.267428170639853e+292,1.0258897434193047e+31,3.867922064222235e-78],0,0],[[6.811775981980025e+18,1.4782394318457476e-109,-5.609454405888344e-131],0,0],[[-1.9166323121487114e-233,-8.914664962649548e-28,6.125036550218122e+186],0,60.65675482516793],[[2.738458460650558e+50,1.2054688632397534e+33,-5.575910688006958e+201],0,1.0],[[-1.7060173400540982e-279,1.692419472494387e-152,-8.508186045528442e-232],2,0],[[3.496596375732988e-212,-1.7601344029867343e-290,-2.7467829813272228e+287],0,58.11261916665845],[[7.5963065745174464e-06,1.6348045764158446e-257,-4.607089829824939e-06],0,1.0],[[4.821955799677156e-289,-2.3184172477948065e+196,1.7483065599934842e+85],0,61.53308646175488],[[-1.0057412795601501e-141,0.060556571647326925,1.8480052807692756e-77],2,0],[[8.452451609890028e+85,3.450903835999846e-213,4.495110039324184e-82],0,0],[[-1.3252476549554923e-172,-1.2400400292246446e+273,-2.099587820327233e-176],0,1.0],[[-1.753002269819775e+157,2.229461735274287e-223,-5.461310186136003e+131],0,0],[[-1.265259404413343e-89,-1.0963427561332458e-156,5.741222418922647e-41],0,0],[[7.0181404927126106e+305,-1.1560520854064811e-178,3.6484688752466967e-69],0,0],[[-3.312607218501177e+276,5.094611782176626e-183,-3.6242962787554164e+165],0,0],[[-1.0064448966798171e+198,-4.253682617948995e-243,-1.6600604267765295e-45],0,0],[[-1.2261367936338352e-64,9.383817895669287e-283,3.611278323934413e-94],0,0],[[1.6564415223201099e+136,-6.991593686636276e+190,-6.602809642561733e-223],0,0],[[-4.485222205559527e+248,1.4448618247603424e-257,3.706054342154294e-129],0,0],[[7.195448856340728e-141,3384824.3314616154,-4.510161549039838e-214],1,0],[[-9.543517271590036e+203,2.6544319953421338e+293,1.1509772202461854e+130],0,0],[[7.876423561266471e+22,-5.7183056168804695e+262,2.809919074811328e-300],2,0],[[2.1859104172563636e-264,-1.6313740517107182e-227,-7.512222795104406e-168],0,1.5849625007211563],[[-82504272040715.1,9.260475542482052e+299,-2.191896168863437e-98],2,0],[[-1.9194647450105577e+144,-5.02014609669523e+254,-3.3925149777052834e-63],0,0],[[8.359355849775862e-16,1.3310146389530143e+163,-1.3274409717698955e-301],0,0],[[-7.543647802930883e-65,4.6811315760090616e-144,2.043780925156358e+88],0,0],[[-1.3285899852668203e+268,-2.1307490533826745e+196,-2.6253419032181803e+196],0,0],[[1.046624167704608e-163,3.4631943627882644e+200,-1.3964572346787755e-152],0,1.0],[[-7.807986006964459e-172,4.648142651511719e+239,-4.519595929536516e-229],0,0],[[-1.3448163575524206e-16,-1.423542426143039e-129,-2.969699723262003e+31],0,0],[[5.903833024524204e-224,-5.866052212830613e+219,-2.0449888976508749e+136],0,61.157957079708986],[[6.75061600976492e-09,-6.990575505691825e-293,-2.097700040267997e+32],0,0],[[-1.0183335489303076e-199,-2.2046896841875876e+105,4.0526523047213233e+244],0,59.72462417842582],[[-4.630105582658964e+112,1.5043274345617834e+228,-231.6086328505263],0,0],[[-16083688965753228.0,-2.915269426177489e-188,-1.1146873205045003e+50],2,0],[[9.861253466270416e+140,6.509917256919526e-155,-1.235130140170164e-126],0,0],[[2.0740305822111617e-302,2.156659933698441e+65,-7.1479705794644704e+252],0,59.5239545806469],[[-3.7138781240413885e-204,-7.263550849085613e-27,5.582278109308679e-72],2,0],[[-9.324073911343234e-97,1.329109205730971e+18,2.480190476546545e-246],0,0],[[7.542398567020551e-205,3.211003609332114e-292,-2.9988557709871706e-297],0,0],[[-3.841622556722524e-66,4.607613593823294e-213,1.705817703400908e+63],2,0],[[-1.1204577574966285e-246,-4.921050894675189e-140,2.0974429565133816e-215],2,0],[[-8.048358363486665e+120,8.530068169212586e+207,2.905639146095198e+214],2,1.0],[[-9.958023069471933e+213,3.554023312793441e+160,1.51646550817889e-257],1,0],[[-0.0007363022252445651,-1.7841118844999841e+249,9.88160538195634e+236],0,59.88743993573152],[[-5.624997011130711e-126,2.3719183352628996e+212,-1.9742436392168267e+216],0,60.255350889881406],[[-1.0155994341356255e+111,1.1988791635038015e-56,-171.37335414723813],0,0],[[-1.7491621663626818e+238,-4.226402616530443e+259,3.50550012204851e-33],0,0],[[-7.497175243828372e+204,1.708686197016133e+79,-3.1472164561505567e-59],0,0],[[-8.05737758242569e-91,1.0057242501199301e-254,-3.222264666704597e-210],0,0],[[1.099315532911349e-23,-2.4132101870415246e+120,-7.586221492885147e-139],0,0],[[-358605196789223.75,1.4540832115601766e+80,-4.5561147022013495e+203],0,60.441063559764686],[[3.224104279734413e-128,3.8655618297451507e+264,-6.394924897500658e-104],1,0],[[-4.266935350404457e+257,-4.095681815309281e+187,6.029252458259788e+248],0,1.0],[[-1.3489282606511781e-35,2.45682697544046e-235,-1.7051167618207031e+156],0,60.98017647400547],[[-3.448018665551091e+46,4.65318267035879e+212,1.7198556401156944e+40],0,0],[[-2.868627256931542e+282,-2.532452753214596e+217,-1.0726845205664223e-63],0,0],[[-3.2017078238224426e+292,-7.4224082205270185e+121,5.394314721089183e-302],0,0],[[-3.023055730501428e-23,-1.175878359064847e-77,-3.9529958064865946e-264],0,0],[[3.6553350706241625e-209,5.073224629669749e-209,-1.2641746276125557e-259],0,0],[[-6.168869222825437e-92,-4.977701482488331e-274,2.2777945340735493e-276],0,0],[[-3.5687398900842987e+52,-8.51976038766166e+293,1.0871440614151498e+289],0,57.997392776194935],[[-1.4372534866880888e+234,4.876905254991102e+285,1.2894750780678564e+300],0,1.0],[[-1.6235425325048555e+261,1.4618355052890434e+227,3.043685036732137e-200],0,1.0],[[1.4920285944075702e-53,-1.738586776813829e-222,7.628653541085044e+123],0,61.258701434077615],[[4.493452818771822e-125,-1.980605354536306e-231,1.4342996382753786e-68],1,1.5849625007211563],[[1.0963301159009184e-183,3.231394614843413e+95,-5.8891022224162905e+299],0,56.81973218624375],[[-171636426038343.06,8.895467702359268e-17,-9.062606466177737e-237],0,0],[[-4.005659624811191e+200,-18632706462072732.0,-4.1068770028392473e+21],0,0],[[-1.3688696209191408e-102,-2.0036982767287855e-282,7.084339583278926e+216],0,60.24657717169728],[[3.879381526714617e+231,-4.612024538520277e+39,1.1166277726761266e+39],0,0],[[-1.7089084754270419e-12,-1.469508077318514e+98,1.8687286825225081e+205],0,60.41843201467783],[[-9.164501627196514e-190,-5.450210145640886e-309,-2.8266439589935105e+168],0,60.859541086901274],[[2.8321391439452527e-177,1.0865881933967427e-239,1.0321884324238089e-204],0,0],[[-6.605881759005181e+183,2.194953362823915e+177,-4.99895221232182e+182],0,0],[[1.3687884379108643e+17,3.468363920687483e-275,9.235058182301351e-298],0,0],[[-1.0915024824878794e+32,1.3508330812519037e-42,-7.643304163425191e-132],0,0],[[3.258549790458107e-45,2.1316535898912934e-76,-5.329618293165233e+254],0,59.474631968114856],[[2.2420303907903802e-68,-4.147815060644267e-269,-1.5885079051767335e-90],0,0],[[-3.969894456140893e-15,-1.317053669789009e+53,5.776745162887772e-81],0,0],[[2.3939618552975763e+242,-4.127632732628039e+21,3.161587187966589e+82],0,0],[[3.2633957345317127e+251,2.0474783165414538e-126,-1.8675181824308287e+123],0,0],[[5.5609724703152094e-123,-9.698832524909335e+106,4.871284163370267e-185],0,0],[[1.9117791443554203e-134,-1.1788306068444453e-175,-7.2672182309421e-153],0,0],[[788647938.445347,-5.600514306056783e-289,-3.4507996665333636e-44],0,0],[[7.4751406322111975e-208,7.348751680152543e-306,5.656765710936691e-76],0,0],[[1.961831527193424e-60,-1.0262805742626176e-88,7.655606647706524e-307],0,0],[[-3.4535699470035837e-158,1.027405627074826e+260,-1.0089466879026102e-120],1,1.0],[[-8.150217400699526e-187,-1.081567422425548e+106,-7.328272485377685e-51],1,0],[[-5.600850699676017e-216,-4.569457869050411e-204,3.981491076325477e+229],0,60.02988735115003],[[-5.201902814304858e+287,-8.370936497660456e+147,1.6703871447091801e-184],0,0],[[3.294798454877577e-109,-1.1634672830494242e+297,5.873882793788073e+304],0,55.54370003871646],[[-2.5842611121723686e-83,1.9827401749271262e+183,2.468160393597418e+16],1,1.0],[[-4.3156972913392805e-297,2.339761031458555e-169,3.943485742551043e+214],0,60.28155775404954],[[8.23935440322281e-255,-6.993566496172953e-149,1.2414218620136766e+210],0,60.34922351850937],[[-1.8008197600788473e-210,-9.339382943714191e+219,-1.9724572392550013e+269],0,59.01688122601553],[[4.2958727261014584e+36,6.328184874755262e+301,1.7255846811749406e-291],0,1.0],[[-2.8873539429251243e+113,9.723806270790304e+261,3.669186107808967e-292],0,0],[[1.4160598314001593e+222,7.17939675829627e-158,5.706174991628051e-294],0,0],[[-8.833333360285963e+123,1.6543220134558954e+211,-2.0075913201092103e-110],0,0],[[-5.799494962865382e+179,-1.9221933359897497e-164,-4.223847889069915e-247],0,0],[[-7.412818439865646e+79,-1.1943364123385422e-44,-2.891150086994789e-239],0,0],[[7.759258852634933e-78,20833.64667003459,2.4398615081868066e+205],0,60.41694135189651],[[-1.242717444963877e+43,2.3948670500504287e-261,6.2092037474963055e+231],0,59.98868627570155],[[2.3255349808732236e+289,-1.1280084353956664e-216,-8.464143987770504e+171],0,0],[[-2.0051342910565085e+265,6.413626161349299e-227,560488966.1174189],0,0],[[2.0882744776400718e-286,-1.930574277247469e-202,1.751208589172235e-52],0,62.22394337671404],[[2.9688880181416084,-2.3040207927157378e-96,-6.579373556970536e-52],0,0],[[-4.194881103238641e+21,9.475383647572687e+150,-4.825887791830381e+144],2,0],[[1.5628986347380075e+167,8.340556674905215e+77,-3.6999440436536584e-49],0,0],[[7.077452111412406e-295,3.966194599780254e-223,3.7838902349270595e+124],0,61.25316496124588],[[4.700763524863875e+204,-2.9207329416306686e+217,1.3073288890631414e+280],0,1.0],[[-7.693815148540151e+114,3.2964836323184035e-155,-5.3525540351311954e-281],0,0],[[8.40015631920143e-267,5.7735379314244544e+135,-2.6804016066367006e-31],0,62.136530907271094],[[1.3086604894940812e-227,5.110728256051039e-260,-2.2230057586741136e-141],0,1.5849625007211563],[[5.996749315117597e+34,-2.0470315990098174e-13,-3.551599710870501e-79],0,0],[[-1.3512698516924462e+222,4.5201803639304495e+192,3.8910566195656857e-199],0,1.0],[[-3.0811702649623344e-274,2.3443867491657545e+246,-6.131456919104946e-248],2,1.0],[[-8.64483328785185e-272,2.6015556795165393e-281,3.569525897033803e-203],2,1.0],[[-3.696014574690946e+253,-6.234818190089148e-22,1.0433422764871603e+92],0,0],[[2.911945305258545e+76,1.607081485572248e+287,3.0951906535851436e+156],0,0],[[-2.304902569428671e-278,4.842080607450392e+183,-1.3710886835561032e-37],0,62.16307349980139],[[-3.0626399470140506e+19,1.9567613186327648e-98,1.3180753941144182e-147],0,0],[[-7.302755623144034e-92,2.034142710886352e+76,2.645632745156305e+72],0,61.61379429787259],[[-1.64305460819134e+147,-1.925191351645937e-38,5.916620005010986e-284],0,0],[[1.1331561154624403e-183,3.1554708951547898e+299,-2.1365439373622427e-112],2,0],[[3.710994234954979e+213,3.820878202523467e-296,1.7176479621738321e-282],0,0],[[4.1035311994183654e+275,2.1154012951226925e+268,-1.1203373459545064e-225],0,0],[[-1.1644934250212247e+195,-1.778006036463959e-243,1.4447268620911757e-89],0,0],[[1.0420632008764305e-255,-6.647381994040776e+28,7.492863265092149e+193],0,60.56975525027214],[[-2.22550224200597e-215,-4.4202281498453134e-210,-2.7561614443533105e+307],0,53.47169079070351],[[2.1023881259435715e-142,1.2286041871551853e+305,-7.250968489147593e+121],0,61.27436649836295],[[6.890711381796581e-252,-7.546945266760574e-90,-2.69825319383642e-133],0,0],[[1.677162052730813e-59,8.686388033007487e-215,-1.3149636586628956e+118],0,61.303087464099775],[[-6.201577640216828e-76,-2.9590397071500346e+28,-4.926806733013528e-158],0,0],[[-5.170525455803253e+144,3.4859445720092225e-35,4.821982933878669e+175],0,0],[[-1.1185816621821212e-94,4.344638216165875e-288,-1.7812260516570316e-155],0,0],[[1.187362624897409e+112,-3.4014587503013307e-66,-5.491335421336957e+149],1,0],[[6.919932177490866,-3.539516667629656e+281,-1.127329219926809e-187],0,0],[[-1.1349630928255783e-207,-1.1559445604370315e+288,-3.57999533002613e+292],0,57.706151226316194],[[1.1966617966615715e+32,-1.308443002203369e+86,-6.664362743500172e-29],0,0],[[6.432750463800895e+170,-1.1888721424009163e-144,-1.7040442460095513e-75],0,0],[[-4.744869685397997e-163,1.1038900376070258e-272,1.1135903314955052e+244],0,59.73720740931781],[[8.192710157560433e-306,2.5216713222419557e+200,2.7861975952274327e-251],1,1.0],[[-2.265074770534004e+131,7.839670149925818e-278,-1.735573807040294e+70],0,0],[[-3.286716298820313e-41,-3.0870693428253524e+115,-1.6615507340775114e+268],0,59.05521258753139],[[-3.6366540230121064e+282,-4.5628330785036e-235,3.412298361507663e+104],0,0],[[3.4304207896824764e+78,-1.5862298780284405e+234,-3.5257614939229864e+45],0,1.0],[[1.1418903566588686e+202,3.057923656733621e+257,1.9635189108773308e+208],1,2.0],[[9.104095698506237e+247,-1.395378566558569e-155,-1.008849602168032e-147],0,0],[[1.5309364148291473e+20,3.009607083325416e-208,4.696040142948554e+202],0,60.45451216541414],[[-1.4929980720652086e+294,1.672328230858498e-214,-7.579010248497065e+83],0,0],[[3.603857068482743e+158,2.9731168912425227e+223,5.5230827984860495e-214],0,1.0],[[1.2569177198304213e+35,-1.396741088899253e-104,-1.2533180509137805e-282],0,0],[[0.056030027328489294,-1.6941667724887288e+108,1.3453300471233885e+129],0,1.0],[[8.548941388682517e-48,2.8670290078668156e+257,9.339975929055322e+155],0,60.98274136957115],[[-5.333959628058546e-35,-1.37284104484469e-193,9.19691126799929e+93],2,0],[[-2.7507146943094008e-114,-4.541303516304554e-153,2.6063194423749796e+134],0,61.17384117792451],[[-7.49044213263508e+291,-1.3788096112971466e-169,2.068929278551331e+156],0,0],[[-2.6265804345369346e+191,1.9899626460259247e-13,-9.596430455745706e+100],0,0],[[5.3364583166991444e+300,-3.088836913113676e+107,-4.497723396184308e+249],0,1.0],[[-2.0013485306413847e-258,3.307434389659611e+110,-80722015057.35544],0,61.948112167540074],[[5.0305259690686196e-231,1.1795612077485763e+52,-7.81439769323426e-309],0,0],[[4.1188846940311216e-171,1.1856484764854597e+269,-1.3692306833325666e-157],2,1.0],[[1.2500602811876808e+40,2.953363332574606e-238,-4.612923893847788e+233],0,59.95326148053716],[[1.6986948886824323e+126,2.0155846495512064e+173,-7.577132280246575e+93],0,0],[[-6.227793500436146e+292,1.0729156452384357e-137,-2.1995102488491374e+92],0,0],[[1.051973877170815e-298,-2.35103610402023e+214,-1.762241542725527e+256],0,59.43317937302809],[[-3.1275696969283374e-124,1.8331795202945072e-122,7.707961271807703e-168],0,0],[[4.142690958783731e-85,2.3636227077055366e+106,-1.2013940617586167e+160],0,60.94336737312885],[[1.170023224533326e-179,-2.647095342829477e-193,-7.384894716657131e+275],0,58.75043075221173],[[1.4462182673219785e-257,6.1701670079874715e-148,-3.4096344247463026e+169],0,60.84821815160063],[[-1.3672693428204055e+119,3.515536684928011e+206,-9.852495186821838e-109],0,0],[[9.581945296609061e+205,-8.171851610632133e-29,3.9211741729059833e+93],0,0],[[-7.207768437261981e+41,1.8636896603361692e+300,2.703480388506777e-207],0,0],[[6.763159401082614e-231,5.60029751695527e-74,-3.996639231722599e-250],0,0],[[-1.660792857124932e-193,1.0163117083670472e-178,1.2848677963582702e+197],0,60.52857576061055],[[3.716620345265454e+191,1.2808656209351454e-308,-8.261513904855362e+50],0,0],[[4.079715673979633e+117,-2.897784303481398e+193,-1.7680917188681742],0,0],[[-5.893156054960838e-209,-1.2838742763593962e-306,3.2540486993164457e+100],0,61.4307459360689],[[-1.3215125919708138e-66,-1.1348077011704342e-165,1.415228692978329e+55],2,0],[[2.8299772476719073e-248,-1.5516908711200715e+114,-1.5546063348868015e+175],0,60.788019299475785],[[-7.91477975257425e-178,1.0120915835571524e+263,2.9738216870275134e+189],0,60.62448515013275],[[1.534294812232018e+296,3.6432528648228024e-99,-1.078537986809811e+95],0,0],[[-5.971284384303698e-181,-1.165108214722553e+183,-3.131868129995754e-179],0,0],[[-4.893796482840715e-96,2.3933397594674356e+274,-1.065087959176633e-15],1,1.0]],"fresh-alts":["#<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)))))))>","#<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) (* (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)))))))>"],"picked-error":15.436135744921794,"best-alt-per-point":[[[-7.097835734746746e+218,1.6219172946297815e+205,-5.707405484951641e+252],0,0],[[2.5842129352573833e+157,2.03476018732095e+119,2.3993845233584173e-107],0,1.0],[[-1.3908305214282044e-154,-2.4923117032686953e+197,-3.7981733760926524e-59],0,0],[[6.8367221822693645e+171,-2.485557599167403e+61,3.637969744290734e+272],0,0],[[3.6070289902878433e-298,2.4220868488775713e+174,-6.924414872876826e+121],0,61.27455062667296],[[-8.127295724709651e+188,1.4680641340515712e+37,2.130535351053153e+251],0,0],[[-6.59522455933465e-44,9.732025433837372e-298,4.3186153363237085e+196],0,60.534670692689666],[[4.717376995390811e-229,-2.3341562724578147e+138,-1.7808212315293658e-267],0,0],[[7.890896542811938e+189,-1.260155462227717e+139,-4.3402484094339546e-98],0,1.0],[[-2.1518590613428118e+57,-3.8472878924535176e-69,1.921602658997656e+224],0,60.12392332543967],[[-1.0752803839894087e-102,-2.4043032639901138e-220,7.317333208039203e-135],0,0],[[-3.5874867218821053e-289,6.639161457381533e+272,7.51766164914667e-83],0,62.340805957937846],[[1.2494134226790036e-90,5.2370439997769816e-251,-1.3732814838912222e+218],0,60.226141843328364],[[-147062523.161634,2.29835853317011e+39,3.8297412694520027e-72],0,0],[[-6.728931476030476e-220,-3.8960057277485095e+62,9.751429336071956e-111],0,0],[[3.4632829335752192e-251,-5.571648378152749e-24,-1.5013788162994641e-139],0,0],[[-2.647005178779469e+185,1.8598894186132259e+137,-3.3947387264781975e-158],0,0],[[2.9019277223709396e-286,-5.0486763504289305e+297,-2.2447560163594899e+161],0,60.93074969374858],[[5.463725192370479e+166,-3.3667834592100016e+22,-2.536436058187021e+276],0,0],[[1.2810755089251013e+75,9.138814505421974e-66,2.6556986431700894e-172],0,0],[[-2.8093867946453197,3.515792627928699e+199,9.597291263463799e+33],0,0],[[1.8150897130550793e+234,3.165542051316829e+57,1.579252672267158e+84],0,1.0],[[-7.8825607621194955e+93,1.1209809220161085e-271,-4.5883837368201683e+216],0,0],[[-3.255819812723566e-280,2.34479875841816e+59,5.702786507831075e+76],0,61.586896051932605],[[-1.7985967492432066e-181,-2.29441662020671e+209,-2.7064948575317953e+102],0,61.41741290190064],[[-5.456612900256313e-153,-1.6440819958925954e-123,8.045725952292009e+27],0,61.863218624207455],[[-3.267629569827715e-251,-8.654617709875635e-36,-5.243244850188282e+70],0,61.624065708565425],[[-1.2177356660474435e-254,7.810899588463585e-172,9.291488452698296e+167],0,60.86428026193053],[[-7.50461175805814e-258,-2.2074245476722926e-139,3.7649062113016876e-174],0,0],[[-2.831440759739633e+280,3.247555001847955e-09,-3.0357084245012946e-130],0,0],[[-6.590241440058156e+158,-3.600398183547405e+279,9.099484178294087e-276],0,0],[[-1.236864784914523e+307,-2.3539834087406223e+176,-1.1399021272637037e+283],0,0],[[1.2224178423718919e+201,-8.576640958071904e-118,-1.945904698138074e+294],0,0],[[-3.685865083311364e-22,3.264541092685341e+28,9.725416649719138e+252],0,59.520999571980504],[[-7.779967944948024e+102,-1.2524242674835265e-178,6.950896233858705e-22],0,0],[[-4.076760961819094e-307,-9.77225532658453e-187,4.4532169971988716e-248],0,0],[[-5.323110058228719e+306,1.1685596793963991e+198,-2.6353579322600854e+190],0,0],[[-1.9050852423101186e+177,3.272100701705269e+216,7.435874100938545e+127],0,0],[[1.7367008233662004e-146,3.241242127032787e+189,-1.8989429074771432e-61],0,0],[[-1.196163833446424e-216,-2.482218997015813e-79,-4.8603401847979466e+293],0,57.59925762427263],[[-7.885752610457983e-237,-1.8011585194123284e+244,1.710179159392655e-230],0,0],[[-4.865962690031574e-57,-9.009421056215597e-142,-5.6291122105439806e+206],0,60.3976604012631],[[-2.0273370129970457e+293,-3.089328922376561e+38,1.7761334469972786e+272],0,0],[[-6.458816293530837e+32,1.2314425699492343e+144,-4.391490797054204e-127],0,0],[[-1.3671559872942241e+32,1.7931450786375e+207,6.7889504343027e+141],0,0],[[3.717688415206528e-63,4.2329024975964494e-120,1.5110472870035968e-137],0,0],[[-3.071247325847018e+168,1.6394729264619353e-305,-2.427270407266838e-292],0,0],[[-2.2380108691988367e+176,-2.2804753660027636e-184,-417.84894784071446],0,0],[[1.273007442525311e+205,-860404.0745975035,9.790032000289722e-170],3,0],[[1.748601585802626e+143,-2.7501066713881833e-45,6.1586742802359446e+280],0,0],[[-7.693537982561176e+228,1.4196179692273589e+51,-1.816962027309807e-87],0,1.0],[[2.0434027565243845e+254,15210.1761529531,-2.7933732390832485e+50],0,1.0],[[-7.045510436190759e+250,3.865070822820752e-125,4.405711435557941e-18],0,0],[[6.86860201817031e+37,-3.6003931204734074e+177,2.9793076670648235e+135],0,0],[[-1.0747586880572918e-225,-3.914306845273933e+191,3.4461982003189476e-271],0,0],[[4.994366090310223e+293,2.9675638609500463e-266,8.497595544438243e+196],0,0],[[-2.4291085511930378e-57,3.7184381896827443e-109,9.342278142177427e-261],0,0],[[-1.9641025336330274e-36,1.5030419663802974e-174,-3.0809655420404695e-28],1,0],[[-2.439062442778655e-102,0.18720893918478226,-3.4986244195491495e-274],0,0],[[8.713457448965708e+55,1.3423233293291483e-162,1.7094985902294833e-299],0,0],[[-4.806258092707348e+97,-3.1666396733025884e-13,6.443766269775323e+116],0,0],[[-2.4346037043150295e+140,1.2878875837081438e-81,-1.2369049141682215e-238],0,0],[[-1.7508318798883553e+27,-1.626718674009136e+164,-2.303287936653167e+103],0,0],[[3.802507995980374e-176,-4.3021363265330954e+273,1.2952736416079913e-172],0,0],[[-1.654438597637836e+210,-4.5087835058803264e-119,-4.76358476622384e-40],0,0],[[-4.4587503598222035e-69,2.220662619570457e+252,-3.220071167646315e+167],0,60.869238566188756],[[-1.894259608196097e+90,3.61050150366864e+208,-4.4100791718387096e+222],0,0],[[9.426838129136436e+163,-2.3181506163130386e+81,4.678580995434083e-146],0,0],[[2.6773769570729964e-91,-3.685146484696044e-133,-6.601969142405229e+46],0,0],[[-2.267428170639853e+292,1.0258897434193047e+31,3.867922064222235e-78],0,0],[[6.811775981980025e+18,1.4782394318457476e-109,-5.609454405888344e-131],0,0],[[-1.9166323121487114e-233,-8.914664962649548e-28,6.125036550218122e+186],0,60.65675482516793],[[2.738458460650558e+50,1.2054688632397534e+33,-5.575910688006958e+201],0,0],[[-1.7060173400540982e-279,1.692419472494387e-152,-8.508186045528442e-232],0,0],[[3.496596375732988e-212,-1.7601344029867343e-290,-2.7467829813272228e+287],0,58.11261916665845],[[7.5963065745174464e-06,1.6348045764158446e-257,-4.607089829824939e-06],0,0],[[4.821955799677156e-289,-2.3184172477948065e+196,1.7483065599934842e+85],0,61.53308646175488],[[-1.0057412795601501e-141,0.060556571647326925,1.8480052807692756e-77],0,0],[[8.452451609890028e+85,3.450903835999846e-213,4.495110039324184e-82],0,0],[[-1.3252476549554923e-172,-1.2400400292246446e+273,-2.099587820327233e-176],2,0],[[-1.753002269819775e+157,2.229461735274287e-223,-5.461310186136003e+131],0,0],[[-1.265259404413343e-89,-1.0963427561332458e-156,5.741222418922647e-41],0,0],[[7.0181404927126106e+305,-1.1560520854064811e-178,3.6484688752466967e-69],0,0],[[-3.312607218501177e+276,5.094611782176626e-183,-3.6242962787554164e+165],0,0],[[-1.0064448966798171e+198,-4.253682617948995e-243,-1.6600604267765295e-45],0,0],[[-1.2261367936338352e-64,9.383817895669287e-283,3.611278323934413e-94],0,0],[[1.6564415223201099e+136,-6.991593686636276e+190,-6.602809642561733e-223],0,0],[[-4.485222205559527e+248,1.4448618247603424e-257,3.706054342154294e-129],0,0],[[7.195448856340728e-141,3384824.3314616154,-4.510161549039838e-214],3,0],[[-9.543517271590036e+203,2.6544319953421338e+293,1.1509772202461854e+130],0,0],[[7.876423561266471e+22,-5.7183056168804695e+262,2.809919074811328e-300],5,0],[[2.1859104172563636e-264,-1.6313740517107182e-227,-7.512222795104406e-168],0,0],[[-82504272040715.1,9.260475542482052e+299,-2.191896168863437e-98],5,0],[[-1.9194647450105577e+144,-5.02014609669523e+254,-3.3925149777052834e-63],0,0],[[8.359355849775862e-16,1.3310146389530143e+163,-1.3274409717698955e-301],0,0],[[-7.543647802930883e-65,4.6811315760090616e-144,2.043780925156358e+88],0,0],[[-1.3285899852668203e+268,-2.1307490533826745e+196,-2.6253419032181803e+196],0,0],[[1.046624167704608e-163,3.4631943627882644e+200,-1.3964572346787755e-152],4,0],[[-7.807986006964459e-172,4.648142651511719e+239,-4.519595929536516e-229],0,0],[[-1.3448163575524206e-16,-1.423542426143039e-129,-2.969699723262003e+31],0,0],[[5.903833024524204e-224,-5.866052212830613e+219,-2.0449888976508749e+136],0,61.157957079708986],[[6.75061600976492e-09,-6.990575505691825e-293,-2.097700040267997e+32],0,0],[[-1.0183335489303076e-199,-2.2046896841875876e+105,4.0526523047213233e+244],0,59.72462417842582],[[-4.630105582658964e+112,1.5043274345617834e+228,-231.6086328505263],0,0],[[-16083688965753228.0,-2.915269426177489e-188,-1.1146873205045003e+50],0,0],[[9.861253466270416e+140,6.509917256919526e-155,-1.235130140170164e-126],0,0],[[2.0740305822111617e-302,2.156659933698441e+65,-7.1479705794644704e+252],0,59.5239545806469],[[-3.7138781240413885e-204,-7.263550849085613e-27,5.582278109308679e-72],0,0],[[-9.324073911343234e-97,1.329109205730971e+18,2.480190476546545e-246],0,0],[[7.542398567020551e-205,3.211003609332114e-292,-2.9988557709871706e-297],0,0],[[-3.841622556722524e-66,4.607613593823294e-213,1.705817703400908e+63],0,0],[[-1.1204577574966285e-246,-4.921050894675189e-140,2.0974429565133816e-215],0,0],[[-8.048358363486665e+120,8.530068169212586e+207,2.905639146095198e+214],0,0],[[-9.958023069471933e+213,3.554023312793441e+160,1.51646550817889e-257],3,0],[[-0.0007363022252445651,-1.7841118844999841e+249,9.88160538195634e+236],0,59.88743993573152],[[-5.624997011130711e-126,2.3719183352628996e+212,-1.9742436392168267e+216],0,60.255350889881406],[[-1.0155994341356255e+111,1.1988791635038015e-56,-171.37335414723813],0,0],[[-1.7491621663626818e+238,-4.226402616530443e+259,3.50550012204851e-33],0,0],[[-7.497175243828372e+204,1.708686197016133e+79,-3.1472164561505567e-59],0,0],[[-8.05737758242569e-91,1.0057242501199301e-254,-3.222264666704597e-210],0,0],[[1.099315532911349e-23,-2.4132101870415246e+120,-7.586221492885147e-139],0,0],[[-358605196789223.75,1.4540832115601766e+80,-4.5561147022013495e+203],0,60.441063559764686],[[3.224104279734413e-128,3.8655618297451507e+264,-6.394924897500658e-104],0,0],[[-4.266935350404457e+257,-4.095681815309281e+187,6.029252458259788e+248],0,1.0],[[-1.3489282606511781e-35,2.45682697544046e-235,-1.7051167618207031e+156],0,60.98017647400547],[[-3.448018665551091e+46,4.65318267035879e+212,1.7198556401156944e+40],0,0],[[-2.868627256931542e+282,-2.532452753214596e+217,-1.0726845205664223e-63],0,0],[[-3.2017078238224426e+292,-7.4224082205270185e+121,5.394314721089183e-302],0,0],[[-3.023055730501428e-23,-1.175878359064847e-77,-3.9529958064865946e-264],0,0],[[3.6553350706241625e-209,5.073224629669749e-209,-1.2641746276125557e-259],0,0],[[-6.168869222825437e-92,-4.977701482488331e-274,2.2777945340735493e-276],0,0],[[-3.5687398900842987e+52,-8.51976038766166e+293,1.0871440614151498e+289],0,57.997392776194935],[[-1.4372534866880888e+234,4.876905254991102e+285,1.2894750780678564e+300],2,0],[[-1.6235425325048555e+261,1.4618355052890434e+227,3.043685036732137e-200],0,1.0],[[1.4920285944075702e-53,-1.738586776813829e-222,7.628653541085044e+123],0,61.258701434077615],[[4.493452818771822e-125,-1.980605354536306e-231,1.4342996382753786e-68],0,0],[[1.0963301159009184e-183,3.231394614843413e+95,-5.8891022224162905e+299],0,56.81973218624375],[[-171636426038343.06,8.895467702359268e-17,-9.062606466177737e-237],0,0],[[-4.005659624811191e+200,-18632706462072732.0,-4.1068770028392473e+21],0,0],[[-1.3688696209191408e-102,-2.0036982767287855e-282,7.084339583278926e+216],0,60.24657717169728],[[3.879381526714617e+231,-4.612024538520277e+39,1.1166277726761266e+39],0,0],[[-1.7089084754270419e-12,-1.469508077318514e+98,1.8687286825225081e+205],0,60.41843201467783],[[-9.164501627196514e-190,-5.450210145640886e-309,-2.8266439589935105e+168],0,60.859541086901274],[[2.8321391439452527e-177,1.0865881933967427e-239,1.0321884324238089e-204],0,0],[[-6.605881759005181e+183,2.194953362823915e+177,-4.99895221232182e+182],1,0],[[1.3687884379108643e+17,3.468363920687483e-275,9.235058182301351e-298],0,0],[[-1.0915024824878794e+32,1.3508330812519037e-42,-7.643304163425191e-132],0,0],[[3.258549790458107e-45,2.1316535898912934e-76,-5.329618293165233e+254],0,59.474631968114856],[[2.2420303907903802e-68,-4.147815060644267e-269,-1.5885079051767335e-90],0,0],[[-3.969894456140893e-15,-1.317053669789009e+53,5.776745162887772e-81],0,0],[[2.3939618552975763e+242,-4.127632732628039e+21,3.161587187966589e+82],0,0],[[3.2633957345317127e+251,2.0474783165414538e-126,-1.8675181824308287e+123],0,0],[[5.5609724703152094e-123,-9.698832524909335e+106,4.871284163370267e-185],0,0],[[1.9117791443554203e-134,-1.1788306068444453e-175,-7.2672182309421e-153],0,0],[[788647938.445347,-5.600514306056783e-289,-3.4507996665333636e-44],0,0],[[7.4751406322111975e-208,7.348751680152543e-306,5.656765710936691e-76],0,0],[[1.961831527193424e-60,-1.0262805742626176e-88,7.655606647706524e-307],0,0],[[-3.4535699470035837e-158,1.027405627074826e+260,-1.0089466879026102e-120],0,0],[[-8.150217400699526e-187,-1.081567422425548e+106,-7.328272485377685e-51],0,0],[[-5.600850699676017e-216,-4.569457869050411e-204,3.981491076325477e+229],0,60.02988735115003],[[-5.201902814304858e+287,-8.370936497660456e+147,1.6703871447091801e-184],0,0],[[3.294798454877577e-109,-1.1634672830494242e+297,5.873882793788073e+304],0,55.54370003871646],[[-2.5842611121723686e-83,1.9827401749271262e+183,2.468160393597418e+16],0,0],[[-4.3156972913392805e-297,2.339761031458555e-169,3.943485742551043e+214],0,60.28155775404954],[[8.23935440322281e-255,-6.993566496172953e-149,1.2414218620136766e+210],0,60.34922351850937],[[-1.8008197600788473e-210,-9.339382943714191e+219,-1.9724572392550013e+269],0,59.01688122601553],[[4.2958727261014584e+36,6.328184874755262e+301,1.7255846811749406e-291],0,1.0],[[-2.8873539429251243e+113,9.723806270790304e+261,3.669186107808967e-292],0,0],[[1.4160598314001593e+222,7.17939675829627e-158,5.706174991628051e-294],0,0],[[-8.833333360285963e+123,1.6543220134558954e+211,-2.0075913201092103e-110],0,0],[[-5.799494962865382e+179,-1.9221933359897497e-164,-4.223847889069915e-247],0,0],[[-7.412818439865646e+79,-1.1943364123385422e-44,-2.891150086994789e-239],0,0],[[7.759258852634933e-78,20833.64667003459,2.4398615081868066e+205],0,60.41694135189651],[[-1.242717444963877e+43,2.3948670500504287e-261,6.2092037474963055e+231],0,59.98868627570155],[[2.3255349808732236e+289,-1.1280084353956664e-216,-8.464143987770504e+171],0,0],[[-2.0051342910565085e+265,6.413626161349299e-227,560488966.1174189],0,0],[[2.0882744776400718e-286,-1.930574277247469e-202,1.751208589172235e-52],0,62.22394337671404],[[2.9688880181416084,-2.3040207927157378e-96,-6.579373556970536e-52],0,0],[[-4.194881103238641e+21,9.475383647572687e+150,-4.825887791830381e+144],0,0],[[1.5628986347380075e+167,8.340556674905215e+77,-3.6999440436536584e-49],0,0],[[7.077452111412406e-295,3.966194599780254e-223,3.7838902349270595e+124],0,61.25316496124588],[[4.700763524863875e+204,-2.9207329416306686e+217,1.3073288890631414e+280],0,0],[[-7.693815148540151e+114,3.2964836323184035e-155,-5.3525540351311954e-281],0,0],[[8.40015631920143e-267,5.7735379314244544e+135,-2.6804016066367006e-31],0,62.136530907271094],[[1.3086604894940812e-227,5.110728256051039e-260,-2.2230057586741136e-141],0,0],[[5.996749315117597e+34,-2.0470315990098174e-13,-3.551599710870501e-79],0,0],[[-1.3512698516924462e+222,4.5201803639304495e+192,3.8910566195656857e-199],0,1.0],[[-3.0811702649623344e-274,2.3443867491657545e+246,-6.131456919104946e-248],0,0],[[-8.64483328785185e-272,2.6015556795165393e-281,3.569525897033803e-203],0,0],[[-3.696014574690946e+253,-6.234818190089148e-22,1.0433422764871603e+92],0,0],[[2.911945305258545e+76,1.607081485572248e+287,3.0951906535851436e+156],0,0],[[-2.304902569428671e-278,4.842080607450392e+183,-1.3710886835561032e-37],0,62.16307349980139],[[-3.0626399470140506e+19,1.9567613186327648e-98,1.3180753941144182e-147],0,0],[[-7.302755623144034e-92,2.034142710886352e+76,2.645632745156305e+72],0,61.61379429787259],[[-1.64305460819134e+147,-1.925191351645937e-38,5.916620005010986e-284],0,0],[[1.1331561154624403e-183,3.1554708951547898e+299,-2.1365439373622427e-112],0,0],[[3.710994234954979e+213,3.820878202523467e-296,1.7176479621738321e-282],0,0],[[4.1035311994183654e+275,2.1154012951226925e+268,-1.1203373459545064e-225],0,0],[[-1.1644934250212247e+195,-1.778006036463959e-243,1.4447268620911757e-89],0,0],[[1.0420632008764305e-255,-6.647381994040776e+28,7.492863265092149e+193],0,60.56975525027214],[[-2.22550224200597e-215,-4.4202281498453134e-210,-2.7561614443533105e+307],0,53.47169079070351],[[2.1023881259435715e-142,1.2286041871551853e+305,-7.250968489147593e+121],0,61.27436649836295],[[6.890711381796581e-252,-7.546945266760574e-90,-2.69825319383642e-133],0,0],[[1.677162052730813e-59,8.686388033007487e-215,-1.3149636586628956e+118],0,61.303087464099775],[[-6.201577640216828e-76,-2.9590397071500346e+28,-4.926806733013528e-158],0,0],[[-5.170525455803253e+144,3.4859445720092225e-35,4.821982933878669e+175],0,0],[[-1.1185816621821212e-94,4.344638216165875e-288,-1.7812260516570316e-155],0,0],[[1.187362624897409e+112,-3.4014587503013307e-66,-5.491335421336957e+149],2,0],[[6.919932177490866,-3.539516667629656e+281,-1.127329219926809e-187],0,0],[[-1.1349630928255783e-207,-1.1559445604370315e+288,-3.57999533002613e+292],0,57.706151226316194],[[1.1966617966615715e+32,-1.308443002203369e+86,-6.664362743500172e-29],0,0],[[6.432750463800895e+170,-1.1888721424009163e-144,-1.7040442460095513e-75],0,0],[[-4.744869685397997e-163,1.1038900376070258e-272,1.1135903314955052e+244],0,59.73720740931781],[[8.192710157560433e-306,2.5216713222419557e+200,2.7861975952274327e-251],0,0],[[-2.265074770534004e+131,7.839670149925818e-278,-1.735573807040294e+70],0,0],[[-3.286716298820313e-41,-3.0870693428253524e+115,-1.6615507340775114e+268],0,59.05521258753139],[[-3.6366540230121064e+282,-4.5628330785036e-235,3.412298361507663e+104],0,0],[[3.4304207896824764e+78,-1.5862298780284405e+234,-3.5257614939229864e+45],0,1.0],[[1.1418903566588686e+202,3.057923656733621e+257,1.9635189108773308e+208],2,0],[[9.104095698506237e+247,-1.395378566558569e-155,-1.008849602168032e-147],0,0],[[1.5309364148291473e+20,3.009607083325416e-208,4.696040142948554e+202],0,60.45451216541414],[[-1.4929980720652086e+294,1.672328230858498e-214,-7.579010248497065e+83],0,0],[[3.603857068482743e+158,2.9731168912425227e+223,5.5230827984860495e-214],0,1.0],[[1.2569177198304213e+35,-1.396741088899253e-104,-1.2533180509137805e-282],0,0],[[0.056030027328489294,-1.6941667724887288e+108,1.3453300471233885e+129],0,0],[[8.548941388682517e-48,2.8670290078668156e+257,9.339975929055322e+155],0,60.98274136957115],[[-5.333959628058546e-35,-1.37284104484469e-193,9.19691126799929e+93],0,0],[[-2.7507146943094008e-114,-4.541303516304554e-153,2.6063194423749796e+134],0,61.17384117792451],[[-7.49044213263508e+291,-1.3788096112971466e-169,2.068929278551331e+156],0,0],[[-2.6265804345369346e+191,1.9899626460259247e-13,-9.596430455745706e+100],0,0],[[5.3364583166991444e+300,-3.088836913113676e+107,-4.497723396184308e+249],0,1.0],[[-2.0013485306413847e-258,3.307434389659611e+110,-80722015057.35544],0,61.948112167540074],[[5.0305259690686196e-231,1.1795612077485763e+52,-7.81439769323426e-309],0,0],[[4.1188846940311216e-171,1.1856484764854597e+269,-1.3692306833325666e-157],0,0],[[1.2500602811876808e+40,2.953363332574606e-238,-4.612923893847788e+233],0,59.95326148053716],[[1.6986948886824323e+126,2.0155846495512064e+173,-7.577132280246575e+93],0,0],[[-6.227793500436146e+292,1.0729156452384357e-137,-2.1995102488491374e+92],0,0],[[1.051973877170815e-298,-2.35103610402023e+214,-1.762241542725527e+256],0,59.43317937302809],[[-3.1275696969283374e-124,1.8331795202945072e-122,7.707961271807703e-168],0,0],[[4.142690958783731e-85,2.3636227077055366e+106,-1.2013940617586167e+160],0,60.94336737312885],[[1.170023224533326e-179,-2.647095342829477e-193,-7.384894716657131e+275],0,58.75043075221173],[[1.4462182673219785e-257,6.1701670079874715e-148,-3.4096344247463026e+169],0,60.84821815160063],[[-1.3672693428204055e+119,3.515536684928011e+206,-9.852495186821838e-109],0,0],[[9.581945296609061e+205,-8.171851610632133e-29,3.9211741729059833e+93],0,0],[[-7.207768437261981e+41,1.8636896603361692e+300,2.703480388506777e-207],0,0],[[6.763159401082614e-231,5.60029751695527e-74,-3.996639231722599e-250],0,0],[[-1.660792857124932e-193,1.0163117083670472e-178,1.2848677963582702e+197],0,60.52857576061055],[[3.716620345265454e+191,1.2808656209351454e-308,-8.261513904855362e+50],0,0],[[4.079715673979633e+117,-2.897784303481398e+193,-1.7680917188681742],0,0],[[-5.893156054960838e-209,-1.2838742763593962e-306,3.2540486993164457e+100],0,61.4307459360689],[[-1.3215125919708138e-66,-1.1348077011704342e-165,1.415228692978329e+55],0,0],[[2.8299772476719073e-248,-1.5516908711200715e+114,-1.5546063348868015e+175],0,60.788019299475785],[[-7.91477975257425e-178,1.0120915835571524e+263,2.9738216870275134e+189],0,60.62448515013275],[[1.534294812232018e+296,3.6432528648228024e-99,-1.078537986809811e+95],0,0],[[-5.971284384303698e-181,-1.165108214722553e+183,-3.131868129995754e-179],0,0],[[-4.893796482840715e-96,2.3933397594674356e+274,-1.065087959176633e-15],0,0]],"picked":"(λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))"}* * * * [misc]pick:  Picked  #<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)))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2 2)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 2 1 2)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 2 1 1)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2 2)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))) into (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) (+ (* (/ (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (+ 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 (/ (+ (* -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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) in J
* [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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 (/ 1 K))))) (log (/ 1 J))) (log (/ 1 U))))) 1)) 1/3) into (pow (sqrt (+ 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) in J
* [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 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 J
* [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 (+ 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- 0) into 0
* [misc]backup-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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1 (- J))) (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))))) (log (/ 1 (- U)))))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3)
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2 2 1 2)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))) into (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) (+ (* (/ (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (+ 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 (/ (+ (* -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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) in J
* [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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 (/ 1 K))))) (log (/ 1 J))) (log (/ 1 U))))) 1)) 1/3) into (pow (sqrt (+ 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) in J
* [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 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 J
* [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 (+ 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- 0) into 0
* [misc]backup-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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1 (- J))) (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))))) (log (/ 1 (- U)))))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3)
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 2 1 1)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) in J
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (* (cos (* 1/2 K)) J))) (log U)) in J
* [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]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 (/ 1/2 (cos (* 1/2 K)))) (log J)) (log U)) 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 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))) into (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))) (+ (* (/ (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (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 (+ 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 (/ (+ (* -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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log (/ 1/2 (cos (* 1/2 K))))) (log J)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)) 1/3) into (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) in J
* [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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 (/ 1 K))))) (log (/ 1 J))) (log (/ 1 U))))) 1)) 1/3) into (pow (sqrt (+ 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 (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) in J
* [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 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 J
* [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 (+ 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]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) in K
* [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 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (- 0) into 0
* [misc]backup-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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 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]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (+ (log (/ 1 (- J))) (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))))) (log (/ 1 (- U)))))) 1)) 1/3) into (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3)
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (* (* -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)))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -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)))))) 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 (* (* (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))))) in U
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))) into (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))))) into (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) into (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 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 (/ 1/2 (* (cos (* 1/2 K)) J))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) 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)) J))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log (/ 1/2 (* (cos (* 1/2 K)) J))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (* (* -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)))))) 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 (* (* (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))))) in K
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (* (* -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)))))) 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 (* (* (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))))) in J
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (* (* -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)))))) 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 (* (* (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))))) in J
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)
* [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 (* (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)) into (pow (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1) 1/3)
* [misc]backup-simplify:  Simplify (* (pow (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1) 1/3) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))
* [misc]backup-simplify:  Simplify (* 0 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (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 (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3) 0) (* 0 (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1) 1/3) 0) (* 0 (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3))) into 0
* [misc]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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) 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 (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)) into (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1))
* [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 (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* 1 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1))) into (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1))
* [misc]backup-simplify:  Simplify (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1))) into (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))
* [misc]backup-simplify:  Simplify (- (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))) into (- (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (sqrt (+ (exp (* 2 (- (log (* 1/2 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 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1) in U
* [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]taylor:  Taking taylor expansion of 1 in U
* [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/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 (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) into 0
* [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]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]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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3) 0) (+ (* 0 0) (* 0 (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1) 1/3) 0) (+ (* 0 0) (* 0 (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1)) 1/3)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 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 (+ (exp (* 2 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (sqrt (+ (exp (* 2 (- (log (* 1/2 U)) (log J)))) 1)))) 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 (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (- (* 2 (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))))) (* 1 (* 1 J))) into (* -2 (* J (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* [misc]approximate:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) (cbrt (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))) (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) (cbrt (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 (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (+ (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 (- (+ (* 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 (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) (cbrt (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 (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) 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 (* U (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 (* U (cos (/ 1/2 K))))) 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 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) (cbrt (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 (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) (cbrt (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 (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)
* [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 (* (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)) into (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3)
* [misc]backup-simplify:  Simplify (* (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)) into (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/3) (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/6))
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 K))) (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/3) (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/6))) into (* -2 (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/6) (* (cos (/ 1/2 K)) (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/6) (* (cos (/ 1/2 K)) (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3)))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/6) (* (cos (/ 1/2 K)) (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3))) in K
* [misc]taylor:  Taking taylor expansion of (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/6) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/6 (log (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/6 (log (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 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 (* U (cos (/ 1/2 K)))))))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log J) (log (/ 1/2 (* U (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 J) (log (/ 1/2 (* U (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 (* 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 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* U (cos (/ 1/2 K))) into (* U (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (* U (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* U (cos (/ 1/2 K))))) into (log (/ 1/2 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))) into (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) into (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))
* [misc]backup-simplify:  Simplify (log (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) into (log (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1))
* [misc]backup-simplify:  Simplify (* 1/6 (log (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1))) into (* 1/6 (log (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/6 (log (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) into (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/6)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ 1/2 K)) (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3)) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) 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 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log J) (log (/ 1/2 (* U (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 J) (log (/ 1/2 (* U (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 (* 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 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* U (cos (/ 1/2 K))) into (* U (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (* U (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* U (cos (/ 1/2 K))))) into (log (/ 1/2 (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))) into (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (log (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) into (log (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))) into (* 1/3 (log (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3)) into (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/3) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/6) (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/3) (cos (/ 1/2 K)))) into (* (cos (/ 1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))
* [misc]backup-simplify:  Simplify (* -2 (* (cos (/ 1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) into (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (/ 1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))) in U
* [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]taylor:  Taking taylor expansion of (log (/ 1/2 (* U (cos (/ 1/2 K))))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* U (cos (/ 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 (* U (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]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 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 0) (* 1 (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]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 J) (- (log (/ 1/2 (cos (/ 1/2 K)))) (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 U
* [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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 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 (+ (* 0 0) (+ (* 1 0) (* 0 (cos (/ 1/2 K))))) 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 (/ 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 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K)))) into (* -2 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* -2 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K)))) into (* -2 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3) 0) (* 0 (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3) 0) (* 0 (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3))) into 0
* [misc]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 (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/3) (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/6)))) 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* U (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* U (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 (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* U (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* U (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 (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/6 0) (* 0 (log (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/6 (log (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/6) 0) (* 0 (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/3) (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (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 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 K)))) (log J)) (log U)))) 1)) (cos (/ 1/2 K))))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) (+ (* (/ (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) (+ (* (/ (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) (+ (* (/ (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3) 0) (+ (* 0 0) (* 0 (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3) 0) (+ (* 0 0) (* 0 (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)) 1/3)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 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 (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/3) (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/6))))) 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow J 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow J 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* U (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* U (cos (/ 1/2 K))))) (* 0 (/ 0 (* U (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 (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) (+ (* (/ (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 (* U (cos (/ 1/2 K)))))))) 1) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1/3)))) 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 (+ (* U 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* U (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* U (cos (/ 1/2 K))))) (* 0 (/ 0 (* U (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 (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) (+ (* (/ (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 J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K))))))))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/6 0) (+ (* 0 0) (* 0 (log (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/6 (log (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/6) 0) (+ (* 0 0) (* 0 (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))) 1) 1/3) (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (* (cos (/ 1/2 K)) (sqrt (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ 1/2 K)))))))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (* (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (/ 1/2 (/ 1 K))))) (log (/ 1 J))) (log (/ 1 U))))) 1)) (cos (/ 1/2 (/ 1 K))))) (* 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))) (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) (cbrt (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))) (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) (cbrt (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 (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (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 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))) into (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1))))) into (pow (sqrt (+ (exp (* 2 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) (cbrt (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 (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (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 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (* U (cos (/ -1/2 K)))))) 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 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (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 (* U (cos (/ -1/2 K))))) 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 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ -1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) (cbrt (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 (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) (cbrt (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 (* (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))
* [misc]backup-simplify:  Simplify (+ 1 (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)
* [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 (* (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)) into (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) 1/3)
* [misc]backup-simplify:  Simplify (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) 1/3) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 K))) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))) into (* 2 (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) in K
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log J) (log (/ 1/2 (* U (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 J) (log (/ 1/2 (* U (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 (* 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 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* U (cos (/ -1/2 K))) into (* U (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (* U (cos (/ -1/2 K)))) into (/ 1/2 (* U (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (* U (cos (/ -1/2 K))))) into (log (/ 1/2 (* U (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))) into (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) into (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))
* [misc]backup-simplify:  Simplify (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) into (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) into (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* U (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ -1/2 K)))) (/ 0 (* U (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 (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) (cos (/ -1/2 K))) into (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))) into (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) in U
* [misc]taylor:  Taking taylor expansion of (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))) in U
* [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]taylor:  Taking taylor expansion of (log (/ 1/2 (* U (cos (/ -1/2 K))))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (* U (cos (/ -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 (* U (cos (/ -1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]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 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 0) (* 1 (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]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 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 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 (* 1 0) 1)) (pow J 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 (+ (* 0 0) (+ (* 1 0) (* 0 (cos (/ -1/2 K))))) 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 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3) 0) (* 0 (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) 1/3) 0) (* 0 (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3))) into 0
* [misc]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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (- 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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) (+ (* (/ (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 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))) (* 0 (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) (+ (* (/ (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 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))) (* 0 (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 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 (* 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 J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) (+ (* (/ (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 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3) 0) (+ (* 0 0) (* 0 (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1) 1/3) 0) (+ (* 0 0) (* 0 (pow (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 1/3)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 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 (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow J 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow J 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* U (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ -1/2 K)))) (/ 0 (* U (cos (/ -1/2 K))))) (* 0 (/ 0 (* U (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 (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) (+ (* (/ (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 (* U (cos (/ -1/2 K)))))))) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 1)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (* (cos (/ -1/2 K)) (sqrt (+ (exp (* 2 (+ (log J) (log (/ 1/2 (* U (cos (/ -1/2 K)))))))) 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 (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1))))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 114 ] 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))))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3))))>
* * * * [misc]progress:  [ 2 / 114 ] 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))))) (pow (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1))))>
* * * * [misc]progress:  [ 3 / 114 ] 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))))) (exp (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (log (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 (log (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 4 / 114 ] 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))))) (log (exp (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 5 / 114 ] 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 (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (cbrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (cbrt (* (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 (cbrt (* (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)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 6 / 114 ] 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 (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (106 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (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:  [ 7 / 114 ] 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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (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))))
* [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:  [ 8 / 114 ] 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)) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt 1))
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt 1))
* [exit]simplify:  Simplified to (cbrt (sqrt 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 9 / 114 ] 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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (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))))
* [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:  [ 10 / 114 ] 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 1) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (cbrt 1)
* [exit]simplify:  Simplified to (cbrt 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 11 / 114 ] 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 (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (204 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]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 (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 12 / 114 ] 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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (194 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 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 (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 (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 13 / 114 ] 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 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]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 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 14 / 114 ] 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 (* (* (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))))) (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 (47 enodes)
* * [misc]simplify:  iters left: 3 (107 enodes)
* * [misc]simplify:  iters left: 2 (332 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:  [ 15 / 114 ] 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))))) (* (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:  [ 16 / 114 ] 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))))) (* 1 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 17 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 18 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (pow (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1)) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 19 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (exp (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (log (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 (log (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 20 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (log (exp (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 21 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cbrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (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 (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (cbrt (* (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 (cbrt (* (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)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 22 / 114 ] 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 (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (106 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (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:  [ 23 / 114 ] 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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (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))))
* [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:  [ 24 / 114 ] 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)) (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))
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt 1))
* [exit]simplify:  Simplified to (cbrt (sqrt 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 25 / 114 ] 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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (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))))
* [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:  [ 26 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cbrt 1) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (cbrt 1)
* [exit]simplify:  Simplified to (cbrt 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 27 / 114 ] 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 (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (204 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]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 (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 28 / 114 ] 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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (194 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 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 (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 (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 29 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (* (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]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 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 30 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [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))))) (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 (47 enodes)
* * [misc]simplify:  iters left: 3 (107 enodes)
* * [misc]simplify:  iters left: 2 (332 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:  [ 31 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (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:  [ 32 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* 1 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 33 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 34 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (pow (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 35 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (exp (log (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 (log (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 (log (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 36 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (log (exp (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 (exp (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 (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (exp (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 37 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (* (cbrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (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 (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (cbrt (* (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 (cbrt (* (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)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 38 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (* (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (106 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (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:  [ 39 / 114 ] 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 (+ 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 (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))))
* [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:  [ 40 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (* (cbrt (sqrt 1)) (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))
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt 1))
* [exit]simplify:  Simplified to (cbrt (sqrt 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 41 / 114 ] 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 (+ 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 (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))))
* [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:  [ 42 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (* (cbrt 1) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (cbrt 1)
* [exit]simplify:  Simplified to (cbrt 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 (104 enodes)
* * [misc]simplify:  iters left: 2 (323 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:  [ 43 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (/ (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (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 (+ (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 (204 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3) (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)))))
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]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 (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- (+ 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 44 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (/ (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (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 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 (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 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 (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 (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 45 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (* (* (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (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 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 46 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [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))))) (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 (47 enodes)
* * [misc]simplify:  iters left: 3 (107 enodes)
* * [misc]simplify:  iters left: 2 (332 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:  [ 47 / 114 ] 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 (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 (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:  [ 48 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (* 1 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 49 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* -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)))))) 1))>
* [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))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (94 enodes)
* * [misc]simplify:  iters left: 3 (259 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 50 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* -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)))))) 1))>
* [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))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (94 enodes)
* * [misc]simplify:  iters left: 3 (259 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 51 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* -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)))))) 1))>
* [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))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (94 enodes)
* * [misc]simplify:  iters left: 3 (259 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 52 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* -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)))))) 1))>
* [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))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (94 enodes)
* * [misc]simplify:  iters left: 3 (259 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 53 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* -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)))))) 1))>
* [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))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (94 enodes)
* * [misc]simplify:  iters left: 3 (259 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 54 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* -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)))))) 1))>
* [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))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (94 enodes)
* * [misc]simplify:  iters left: 3 (259 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 55 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* -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)))))) 1))>
* * * * [misc]progress:  [ 56 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (+ (+ (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (+ (+ (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (44 enodes)
* * [misc]simplify:  iters left: 4 (89 enodes)
* * [misc]simplify:  iters left: 3 (223 enodes)
* [exit]simplify:  Simplified to (+ (+ (+ (log (cos (/ K 2))) (log (* J -2))) (log (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (+ (log (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (log (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))))
* [exit]simplify:  Simplified to (+ (+ (+ (log (cos (/ K 2))) (log (* J -2))) (log (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (+ (log (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (log (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))))
* * * * [misc]progress:  [ 57 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (+ (log (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (+ (log (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (24 enodes)
* * [misc]simplify:  iters left: 5 (46 enodes)
* * [misc]simplify:  iters left: 4 (91 enodes)
* * [misc]simplify:  iters left: 3 (228 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (+ (log (cos (/ K 2))) (log (* J -2)))) (log (* (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))))
* [exit]simplify:  Simplified to (+ (+ (log (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (+ (log (cos (/ K 2))) (log (* J -2)))) (log (* (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))))
* * * * [misc]progress:  [ 58 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (* (* (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 (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (45 enodes)
* * [misc]simplify:  iters left: 4 (86 enodes)
* * [misc]simplify:  iters left: 3 (206 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (+ (log (cos (/ K 2))) (log (* J -2))))
* [exit]simplify:  Simplified to (+ (log (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (+ (log (cos (/ K 2))) (log (* J -2))))
* * * * [misc]progress:  [ 59 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (log (* (* -2 J) (cos (/ K 2)))) (+ (+ (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (+ (log (* (* -2 J) (cos (/ K 2)))) (+ (+ (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (83 enodes)
* * [misc]simplify:  iters left: 3 (198 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))) (log (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))) (+ (log (* (cos (/ K 2)) (* J -2))) (log (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))))
* [exit]simplify:  Simplified to (+ (+ (log (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))) (log (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))) (+ (log (* (cos (/ K 2)) (* J -2))) (log (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))))
* * * * [misc]progress:  [ 60 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (log (* (* -2 J) (cos (/ K 2)))) (+ (log (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (+ (log (* (* -2 J) (cos (/ K 2)))) (+ (log (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (44 enodes)
* * [misc]simplify:  iters left: 4 (85 enodes)
* * [misc]simplify:  iters left: 3 (199 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (* (cos (/ K 2)) (* J -2))) (log (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (log (* (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))))
* [exit]simplify:  Simplified to (+ (+ (log (* (cos (/ K 2)) (* J -2))) (log (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (log (* (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))))
* * * * [misc]progress:  [ 61 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (log (* (* -2 J) (cos (/ K 2)))) (log (* (* (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 (+ (log (* (* -2 J) (cos (/ K 2)))) (log (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (43 enodes)
* * [misc]simplify:  iters left: 4 (83 enodes)
* * [misc]simplify:  iters left: 3 (190 enodes)
* [exit]simplify:  Simplified to (+ (log (* (cos (/ K 2)) (* J -2))) (log (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (+ (log (* (cos (/ K 2)) (* J -2))) (log (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 62 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (log (* (* (* -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 (log (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (43 enodes)
* * [misc]simplify:  iters left: 4 (110 enodes)
* * [misc]simplify:  iters left: 3 (319 enodes)
* [exit]simplify:  Simplified to (log (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (log (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 63 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (log (exp (* (* (* -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 (exp (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (103 enodes)
* * [misc]simplify:  iters left: 3 (269 enodes)
* [exit]simplify:  Simplified to (pow (pow (exp (* J -2)) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (pow (pow (exp (* J -2)) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 64 / 114 ] 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 (* (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (+ (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3))) (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3))))))
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (+ (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3))) (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3))))))
* * * * [misc]progress:  [ 65 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (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 (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 (+ 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)))) (* (* (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (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 (26 enodes)
* * [misc]simplify:  iters left: 5 (65 enodes)
* * [misc]simplify:  iters left: 4 (210 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (* (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (pow (* J -2) 3)) (* (cos (/ K 2)) (cos (/ K 2)))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (* (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 66 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (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)))) (* (* (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (26 enodes)
* * [misc]simplify:  iters left: 5 (63 enodes)
* * [misc]simplify:  iters left: 4 (204 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (* (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (* (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 67 / 114 ] 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 (* (+ (pow (* (cos (/ K 2)) (* J -2)) 3) (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (pow (* (cos (/ K 2)) (* J -2)) 3))) (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (+ (pow (* (cos (/ K 2)) (* J -2)) 3) (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (pow (* (cos (/ K 2)) (* J -2)) 3))) (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 68 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* -2 J) (cos (/ K 2))) (* (* -2 J) (cos (/ K 2)))) (* (* -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 (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 (+ 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)))) (* (* (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (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 (24 enodes)
* * [misc]simplify:  iters left: 5 (59 enodes)
* * [misc]simplify:  iters left: 4 (179 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (pow (* (cos (/ K 2)) (* J -2)) 3)) (* (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (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)))))) (pow (* (cos (/ K 2)) (* J -2)) 3)) (* (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 69 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* -2 J) (cos (/ K 2))) (* (* -2 J) (cos (/ K 2)))) (* (* -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 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (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)))) (* (* (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (24 enodes)
* * [misc]simplify:  iters left: 5 (57 enodes)
* * [misc]simplify:  iters left: 4 (176 enodes)
* [exit]simplify:  Simplified to (* (* (pow (* (cos (/ K 2)) (* J -2)) 3) (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (* (pow (* (cos (/ K 2)) (* J -2)) 3) (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 70 / 114 ] 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))) (* (* (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))) (* (* (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 (* (* (* -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))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (41 enodes)
* * [misc]simplify:  iters left: 4 (96 enodes)
* * [misc]simplify:  iters left: 3 (258 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [enter]simplify:  Simplifying (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)))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (95 enodes)
* * [misc]simplify:  iters left: 3 (257 enodes)
* [exit]simplify:  Simplified to (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (cbrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 71 / 114 ] 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)))))) (* (* (* -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))))))) (* (* (* -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))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (* (* -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))))))) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (48 enodes)
* * [misc]simplify:  iters left: 4 (154 enodes)
* [exit]simplify:  Simplified to (pow (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) 3)
* [exit]simplify:  Simplified to (pow (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) 3)
* * * * [misc]progress:  [ 72 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (sqrt (* (* (* -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))))))) (sqrt (* (* (* -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 (sqrt (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (95 enodes)
* * [misc]simplify:  iters left: 3 (257 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [enter]simplify:  Simplifying (sqrt (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (95 enodes)
* * [misc]simplify:  iters left: 3 (257 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* [exit]simplify:  Simplified to (sqrt (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))))
* * * * [misc]progress:  [ 73 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* 1 (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 74 / 114 ] 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 (206 enodes)
* * [misc]simplify:  iters left: 2 (483 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (* (cos (/ K 2)) (* J -2)) (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))) (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 75 / 114 ] 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 (* (cos (/ K 2)) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (58 enodes)
* * [misc]simplify:  iters left: 3 (122 enodes)
* * [misc]simplify:  iters left: 2 (350 enodes)
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (sqrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (sqrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))
* * * * [misc]progress:  [ 76 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))))) (* (* (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (111 enodes)
* * [misc]simplify:  iters left: 3 (361 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)) (* (cos (/ K 2)) (* J -2)))
* [exit]simplify:  Simplified to (* (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)) (* (cos (/ K 2)) (* J -2)))
* * * * [misc]progress:  [ 77 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (* (* (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (28 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (129 enodes)
* * [misc]simplify:  iters left: 3 (475 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ (* (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3) (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3)) 1))) (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))))) (* (cos (/ K 2)) -2))) (* (cbrt (sqrt (+ (* (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3) (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3)) 1))) J))
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ (* (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3) (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3)) 1))) (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))))) (* (cos (/ K 2)) -2))) (* (cbrt (sqrt (+ (* (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3) (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3)) 1))) J))
* * * * [misc]progress:  [ 78 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))))) (* (* (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))))
* * [misc]simplify:  iters left: 6 (28 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (126 enodes)
* * [misc]simplify:  iters left: 3 (459 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1))) (* J (cbrt (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) (+ 3 1))))))) (* (* (cos (/ K 2)) -2) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))))
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1))) (* J (cbrt (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) (+ 3 1))))))) (* (* (cos (/ K 2)) -2) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))))
* * * * [misc]progress:  [ 79 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (* (* (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 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 (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (28 enodes)
* * [misc]simplify:  iters left: 5 (55 enodes)
* * [misc]simplify:  iters left: 4 (130 enodes)
* * [misc]simplify:  iters left: 3 (473 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) -2) (cbrt (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) (+ 3 1)))))) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))) (* J (cbrt (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) (+ 3 1)))))))
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) -2) (cbrt (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) (+ 3 1)))))) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))) (* J (cbrt (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) (+ 3 1)))))))
* * * * [misc]progress:  [ 80 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))))) (* (* (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))))
* * [misc]simplify:  iters left: 6 (28 enodes)
* * [misc]simplify:  iters left: 5 (55 enodes)
* * [misc]simplify:  iters left: 4 (130 enodes)
* * [misc]simplify:  iters left: 3 (468 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))) (cbrt (sqrt (+ 1 (* (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3) (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3)))))) (* (cbrt (sqrt (+ 1 (* (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3) (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3))))) (* (cos (/ K 2)) J)))
* [exit]simplify:  Simplified to (* (* (* -2 (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))) (cbrt (sqrt (+ 1 (* (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3) (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3)))))) (* (cbrt (sqrt (+ 1 (* (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3) (pow (/ (/ (/ U J) 2) (cos (/ K 2))) 3))))) (* (cos (/ K 2)) J)))
* * * * [misc]progress:  [ 81 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (* (* (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (28 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (126 enodes)
* * [misc]simplify:  iters left: 3 (455 enodes)
* [exit]simplify:  Simplified to (* (* (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))) (cos (/ K 2))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))) (* (cbrt (sqrt (+ 1 (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3))))) (* J -2)))
* [exit]simplify:  Simplified to (* (* (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))) (cos (/ K 2))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))) (* (cbrt (sqrt (+ 1 (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3))))) (* J -2)))
* * * * [misc]progress:  [ 82 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))))) (* (* (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))))
* * [misc]simplify:  iters left: 6 (28 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (129 enodes)
* * [misc]simplify:  iters left: 3 (468 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (* (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))) (cbrt (sqrt (+ (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3) 1)))))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (* (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))) (cbrt (sqrt (+ (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3) 1)))))
* * * * [misc]progress:  [ 83 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (* (* (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (105 enodes)
* * [misc]simplify:  iters left: 3 (340 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))
* * * * [misc]progress:  [ 84 / 114 ] 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 (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))))) (* (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))))
* * [misc]simplify:  iters left: 6 (26 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (125 enodes)
* * [misc]simplify:  iters left: 3 (425 enodes)
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* (cbrt (sqrt (+ (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3)) 1))) (cbrt (sqrt (+ (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3)) 1)))))
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* (cbrt (sqrt (+ (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3)) 1))) (cbrt (sqrt (+ (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3)) 1)))))
* * * * [misc]progress:  [ 85 / 114 ] 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 (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (* (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (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 (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (31 enodes)
* * [misc]simplify:  iters left: 5 (59 enodes)
* * [misc]simplify:  iters left: 4 (140 enodes)
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* (cbrt (sqrt (- 1 (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (cbrt (sqrt (+ (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3)) 1)))))
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))) (* (cbrt (sqrt (- 1 (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (cbrt (sqrt (+ (* (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3) (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3)) 1)))))
* * * * [misc]progress:  [ 86 / 114 ] 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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))))) (* (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))))
* * [misc]simplify:  iters left: 6 (31 enodes)
* * [misc]simplify:  iters left: 5 (59 enodes)
* * [misc]simplify:  iters left: 4 (140 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (cbrt (sqrt (- 1 (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (pow (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 3) 1)))))
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (cbrt (sqrt (- 1 (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (pow (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 3) 1)))))
* * * * [misc]progress:  [ 87 / 114 ] 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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (* (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (49 enodes)
* * [misc]simplify:  iters left: 4 (118 enodes)
* * [misc]simplify:  iters left: 3 (406 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))) (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))))
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1)))))) (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 88 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))))) (* (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))))
* * [misc]simplify:  iters left: 6 (26 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (119 enodes)
* * [misc]simplify:  iters left: 3 (393 enodes)
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) J) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))) (* (* (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) -2) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))))
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) J) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))) (* (* (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) -2) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))))
* * * * [misc]progress:  [ 89 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (* (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (31 enodes)
* * [misc]simplify:  iters left: 5 (59 enodes)
* * [misc]simplify:  iters left: 4 (140 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (- 1 (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (cos (/ K 2))) (* (* (* J -2) (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))) (cbrt (sqrt (+ (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3) 1)))))
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (- 1 (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (cos (/ K 2))) (* (* (* J -2) (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))) (cbrt (sqrt (+ (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3) 1)))))
* * * * [misc]progress:  [ 90 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))))) (* (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))))
* * [misc]simplify:  iters left: 6 (31 enodes)
* * [misc]simplify:  iters left: 5 (59 enodes)
* * [misc]simplify:  iters left: 4 (140 enodes)
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (- 1 (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (* (cbrt (sqrt (+ (pow (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 3) 1))) (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (- 1 (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (* (cbrt (sqrt (+ (pow (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 3) 1))) (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 91 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (* (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (48 enodes)
* * [misc]simplify:  iters left: 4 (114 enodes)
* * [misc]simplify:  iters left: 3 (395 enodes)
* [exit]simplify:  Simplified to (* (* (* J (* (cos (/ K 2)) -2)) (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))))
* [exit]simplify:  Simplified to (* (* (* J (* (cos (/ K 2)) -2)) (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1))))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))))
* * * * [misc]progress:  [ 92 / 114 ] 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 (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))))
* * [misc]simplify:  iters left: 6 (26 enodes)
* * [misc]simplify:  iters left: 5 (53 enodes)
* * [misc]simplify:  iters left: 4 (124 enodes)
* * [misc]simplify:  iters left: 3 (422 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (* (* (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)))) (cbrt (sqrt (+ (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3) 1)))))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (* (* (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)))) (cbrt (sqrt (+ (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3) 1)))))
* * * * [misc]progress:  [ 93 / 114 ] 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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (48 enodes)
* * [misc]simplify:  iters left: 4 (117 enodes)
* * [misc]simplify:  iters left: 3 (402 enodes)
* [exit]simplify:  Simplified to (* (* (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)))) (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) (+ 3 1)))))))
* [exit]simplify:  Simplified to (* (* (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)))) (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) (+ 3 1)))))))
* * * * [misc]progress:  [ 94 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (26 enodes)
* * [misc]simplify:  iters left: 5 (53 enodes)
* * [misc]simplify:  iters left: 4 (124 enodes)
* * [misc]simplify:  iters left: 3 (431 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3) 1))) (* (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (* (cos (/ K 2)) -2) J))) (cbrt (sqrt (+ (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3) 1))))
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3) 1))) (* (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (* (* (cos (/ K 2)) -2) J))) (cbrt (sqrt (+ (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3) 1))))
* * * * [misc]progress:  [ 95 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 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 (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 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 (140 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))) (cbrt (sqrt (- 1 (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))) (cbrt (sqrt (- 1 (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 96 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ 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 (140 enodes)
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (- 1 (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (* (cbrt (sqrt (+ 1 (pow (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 3)))) (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (- 1 (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (* (cbrt (sqrt (+ 1 (pow (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 3)))) (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 97 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (48 enodes)
* * [misc]simplify:  iters left: 4 (117 enodes)
* * [misc]simplify:  iters left: 3 (404 enodes)
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))) (* (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))))
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))) (* (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))))
* * * * [misc]progress:  [ 98 / 114 ] 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 (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 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 (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (26 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (119 enodes)
* * [misc]simplify:  iters left: 3 (399 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -2)) (* (cbrt (sqrt (+ (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3) 1))) (* (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 (* (* (cos (/ K 2)) (* J -2)) (* (cbrt (sqrt (+ (pow (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 3) 1))) (* (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))))))
* * * * [misc]progress:  [ 99 / 114 ] 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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (48 enodes)
* * [misc]simplify:  iters left: 4 (114 enodes)
* * [misc]simplify:  iters left: 3 (396 enodes)
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -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))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))))
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -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))) (cbrt (sqrt (- 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) (+ 3 1)))))))
* * * * [misc]progress:  [ 100 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (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 (26 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (125 enodes)
* * [misc]simplify:  iters left: 3 (431 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -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)))) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* J -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)))) (cbrt (sqrt (+ (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)) 1)))))
* * * * [misc]progress:  [ 101 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (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 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (49 enodes)
* * [misc]simplify:  iters left: 4 (118 enodes)
* * [misc]simplify:  iters left: 3 (404 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (* (cos (/ K 2)) (* J -2))) (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))))) (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))))
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))) (* (cos (/ K 2)) (* J -2))) (* (cbrt (sqrt (- 1 (pow (/ (/ (/ U J) 2) (cos (/ K 2))) (+ 3 1))))) (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 102 / 114 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (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))))) (* (* -2 J) (cos (/ K 2)))))>
* * * * [misc]progress:  [ 103 / 114 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3))))>
* [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))))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)))
* * [misc]simplify:  iters left: 6 (32 enodes)
* * [misc]simplify:  iters left: 5 (63 enodes)
* * [misc]simplify:  iters left: 4 (146 enodes)
* * [misc]simplify:  iters left: 3 (423 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) 1))) (* (cos (/ K 2)) (* J -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:  [ 104 / 114 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))) 1/3))))>
* [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))))) (pow (sqrt (+ 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 (79 enodes)
* * [misc]simplify:  iters left: 4 (184 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (+ (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U)))) 1))) (* (* (* (cos (/ K 2)) (* J -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:  [ 105 / 114 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3))))>
* [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))))) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3)))
* * [misc]simplify:  iters left: 6 (38 enodes)
* * [misc]simplify:  iters left: 5 (78 enodes)
* * [misc]simplify:  iters left: 4 (183 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (* (* (cos (/ K 2)) (* J -2)) (cbrt (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))) (cbrt (sqrt (+ 1 (pow (exp 2) (+ (- (log (/ -1 J)) (log (/ -1 U))) (log (/ 1/2 (cos (* K 1/2))))))))))
* * * * [misc]progress:  [ 106 / 114 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)) (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)))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3)) (cbrt (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 (143 enodes)
* * [misc]simplify:  iters left: 3 (405 enodes)
* [exit]simplify:  Simplified to (* (* (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))) (* (* J -2) (cbrt (sqrt (+ 1 (* (* (/ U J) 1/2) (* (/ U J) 1/2))))))))
* * * * [misc]progress:  [ 107 / 114 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))) 1/3)) (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)))) (pow (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))) 1/3)) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (37 enodes)
* * [misc]simplify:  iters left: 5 (78 enodes)
* * [misc]simplify:  iters left: 4 (179 enodes)
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -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))))) (cbrt (sqrt (+ 1 (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U))))))))
* * * * [misc]progress:  [ 108 / 114 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3)) (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)))) (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3)) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (38 enodes)
* * [misc]simplify:  iters left: 5 (78 enodes)
* * [misc]simplify:  iters left: 4 (180 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (* J -2)) (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)))) (cbrt (sqrt (+ (pow (exp 2) (+ (- (log (/ -1 J)) (log (/ -1 U))) (log (/ 1/2 (cos (* 1/2 K)))))) 1))))
* * * * [misc]progress:  [ 109 / 114 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3) (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))) (* (* (pow (sqrt (+ 1 (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))))) 1/3) (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 (32 enodes)
* * [misc]simplify:  iters left: 5 (64 enodes)
* * [misc]simplify:  iters left: 4 (147 enodes)
* * [misc]simplify:  iters left: 3 (423 enodes)
* [exit]simplify:  Simplified to (* (* (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)))) (* (cbrt (sqrt (+ (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) 1))) (* (cos (/ K 2)) (* J -2))))
* * * * [misc]progress:  [ 110 / 114 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (pow (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))) 1/3) (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))) (* (* (pow (sqrt (+ 1 (exp (* 2 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U))))))) 1/3) (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 (37 enodes)
* * [misc]simplify:  iters left: 5 (80 enodes)
* * [misc]simplify:  iters left: 4 (185 enodes)
* [exit]simplify:  Simplified to (* (* (* (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (cos (/ K 2)) (* J -2))) (cbrt (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))) (cbrt (sqrt (+ (pow (exp 2) (- (log (/ 1/2 (cos (* K 1/2)))) (- (log J) (log U)))) 1))))
* * * * [misc]progress:  [ 111 / 114 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3) (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))) (* (* (pow (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)) 1/3) (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 (38 enodes)
* * [misc]simplify:  iters left: 5 (79 enodes)
* * [misc]simplify:  iters left: 4 (184 enodes)
* [exit]simplify:  Simplified to (* (* (* (cos (/ K 2)) (* J -2)) (* (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (cbrt (sqrt (+ (pow (exp 2) (+ (log (/ 1/2 (cos (* 1/2 K)))) (- (log (/ -1 J)) (log (/ -1 U))))) 1))))
* * * * [misc]progress:  [ 112 / 114 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* J (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1)))))>
* [enter]simplify:  Simplifying (* -2 (* J (sqrt (+ (exp (* 2 (- (+ (log U) (log 1/2)) (log J)))) 1))))
* * [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 (* (* J -2) (sqrt (+ 1 (* (* 1/2 (/ U J)) (* 1/2 (/ U J))))))
* * * * [misc]progress:  [ 113 / 114 ] 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 (337 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (* K 1/2))) (sqrt (+ 1 (* (* (/ 1/2 (cos (* K 1/2))) (* (/ 1 J) U)) (* (/ 1/2 (cos (* K 1/2))) (* (/ 1 J) U))))))
* * * * [misc]progress:  [ 114 / 114 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1)))))>
* [enter]simplify:  Simplifying (* -2 (* (* (cos (* 1/2 K)) J) (sqrt (+ (exp (* 2 (- (+ (log (/ 1/2 (cos (* 1/2 K)))) (log (/ -1 J))) (log (/ -1 U))))) 1))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (115 enodes)
* * [misc]simplify:  iters left: 3 (332 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (* (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* K 1/2)))) (* (/ (/ -1 J) (/ -1 U)) (/ 1/2 (cos (* K 1/2))))))) (* (cos (* K 1/2)) (* J -2)))
* * * [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) (* (* (* -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)))))))> #<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) (* (* (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))) (* (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))))))> #<alt-delta (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt-delta (λ (J K U) (log (pow (pow (exp (* J -2)) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1)))))>)
* [misc]regimes:  Found splitpoints: (#s(sp 0 (* (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)))))) +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 (* (* (cos (/ K 2)) (* J -2)) (sqrt (+ (pow (/ U (* (* 2 J) (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 7996 / 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 8000 points with exact outputs