(if.f64 (<=.f64 mu #s(literal 4113761393303015/822752278660603021077484591278675252491367932816789931674304512 binary64)) (/.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) mu) (/.f64 h (sin.f64 i))) (*.f64 (*.f64 (*.f64 (sin.f64 i) mu) (/.f64 #s(literal 1 binary64) h)) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))))
(if.f64 (<=.f64 (*.f64 (neg.f64 (/.f64 mu h)) (*.f64 (neg.f64 (+.f64 (cos.f64 theta) (*.f64 e (cos.f64 AP)))) (sin.f64 i))) #s(literal 1997919072202235/199791907220223502808422222706762643567910281130558153654986045416023791284464999687699590596063486154228923591770023865308670443474450259602571264 binary64)) (*.f64 mu (/.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (sin.f64 i)) h)) (*.f64 (*.f64 (*.f64 (sin.f64 i) mu) (/.f64 #s(literal 1 binary64) h)) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))))
(*.f64 mu (/.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (sin.f64 i)) h))
(*.f64 mu (*.f64 (/.f64 (sin.f64 i) h) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))))
(if.f64 (<=.f64 mu #s(literal 500000000000000022442856339037958392774656 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) mu) (*.f64 (*.f64 (neg.f64 (sin.f64 AN)) (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta))) mu)) h) (*.f64 mu (/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h)))
(if.f64 (<=.f64 (neg.f64 (/.f64 mu h)) #s(literal -4830671903771573/241533595188578646543459493183249209018682958106652187416077203215719946393097526533512110411370161122653976001968886073585317416315186728483931792091692546793561300926464 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 AN)) (cos.f64 i)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) (/.f64 h mu)) (/.f64 mu (/.f64 h (-.f64 (*.f64 (*.f64 (cos.f64 AN) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))) (cos.f64 i)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))))))
(if.f64 (<=.f64 mu #s(literal 3602879701896397/18014398509481984 binary64)) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) mu) h) (*.f64 mu (/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h)))
(if.f64 (<=.f64 h #s(literal 5000000000000 binary64)) (*.f64 (/.f64 mu h) (-.f64 (*.f64 (cos.f64 i) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN)))) (*.f64 mu (/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h)))
(*.f64 mu (/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h))
(if.f64 (<=.f64 (neg.f64 (/.f64 mu h)) #s(literal -1723641332219371/43091033305484275771318189120554014028188383664727440257009917157939053808001686094755156265186004592451444480869811959505055188993505721246743058601180207922833192313884218148386109504588371699886434318219521032192 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (sin.f64 AN)) (cos.f64 i)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) (/.f64 (neg.f64 h) mu)) (*.f64 (neg.f64 mu) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (*.f64 (cos.f64 i) (sin.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) h)))
(if.f64 (<=.f64 (neg.f64 (/.f64 mu h)) #s(literal -8104522595470689/16209045190941378744189093217543598246142368094697019140608036444104112544581672446873855659949624196438272994575393707743731058888327247296433104820757670652582741419537146576896 binary64)) (*.f64 (neg.f64 (/.f64 mu h)) (+.f64 (*.f64 (cos.f64 AN) (+.f64 (sin.f64 theta) (*.f64 e (sin.f64 AP)))) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (*.f64 (cos.f64 i) (sin.f64 AN))))) (*.f64 (neg.f64 mu) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (*.f64 (cos.f64 i) (sin.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) h)))
(if.f64 (<=.f64 (neg.f64 (/.f64 mu h)) #s(literal -8104522595470689/16209045190941378744189093217543598246142368094697019140608036444104112544581672446873855659949624196438272994575393707743731058888327247296433104820757670652582741419537146576896 binary64)) (*.f64 (neg.f64 (/.f64 mu h)) (+.f64 (*.f64 (cos.f64 AN) (+.f64 (sin.f64 theta) (*.f64 e (sin.f64 AP)))) (*.f64 (*.f64 (sin.f64 AN) (+.f64 (cos.f64 theta) (*.f64 e (cos.f64 AP)))) (cos.f64 i)))) (*.f64 (neg.f64 mu) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (*.f64 (cos.f64 i) (sin.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) h)))
(if.f64 (<=.f64 (neg.f64 (/.f64 mu h)) #s(literal -8139666055761541/1627933211152308172382776316094057079381044512284157265721742629825204403764070329961287158415906809263410622703474912218234570716337735615323084973713581554222450580936038710562274972146438970881094974642550439936936217782587026682413056 binary64)) (*.f64 (neg.f64 (/.f64 mu h)) (+.f64 (*.f64 (cos.f64 AN) (+.f64 (sin.f64 theta) (*.f64 e (sin.f64 AP)))) (*.f64 (*.f64 (cos.f64 i) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))) (sin.f64 AN)))) (*.f64 (neg.f64 mu) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (*.f64 (cos.f64 i) (sin.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) h)))
(*.f64 (neg.f64 mu) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (*.f64 (cos.f64 i) (sin.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) h))
(*.f64 (neg.f64 mu) (/.f64 (+.f64 (*.f64 (cos.f64 i) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (sin.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) h))
(*.f64 (-.f64 e #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) e) a))
(*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e)))
(*.f64 (*.f64 (sin.f64 i) r) (sin.f64 theta))
(*.f64 r (*.f64 (sin.f64 theta) (sin.f64 i)))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) r) (sin.f64 AN)) (*.f64 (neg.f64 r) (*.f64 (cos.f64 i) (*.f64 (sin.f64 theta) (cos.f64 AN)))))
(*.f64 r (+.f64 (*.f64 (sin.f64 AN) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 AN) (sin.f64 theta)) (cos.f64 i))))
(*.f64 r (-.f64 (*.f64 (cos.f64 AN) (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 AN) (sin.f64 theta)) (cos.f64 i))))
(*.f64 r (-.f64 (*.f64 (cos.f64 AN) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 i) (sin.f64 theta)) (sin.f64 AN))))
(/.f64 p (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))))
(*.f64 (atanh.f64 (/.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) f)) (sqrt.f64 (/.f64 (-.f64 #s(literal -1 binary64) e) (-.f64 #s(literal 1 binary64) e))))) #s(literal 2 binary64))
(*.f64 (atanh.f64 (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) f)) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) e) (-.f64 #s(literal -1 binary64) e))))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (atan2.f64 (*.f64 (*.f64 (sqrt.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) e))) (sqrt.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) e)))) (sin.f64 (/.f64 f #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) e)) (cos.f64 (/.f64 f #s(literal 2 binary64))))))
(*.f64 (atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) f) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) e))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) f)) (sqrt.f64 (-.f64 e #s(literal -1 binary64))))) #s(literal 2 binary64))
(*.f64 (atan2.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) f)) (sqrt.f64 (-.f64 #s(literal 1 binary64) e))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) f)) (sqrt.f64 (-.f64 e #s(literal -1 binary64))))) #s(literal 2 binary64))
(if.f64 (<=.f64 v #s(literal 4146072293388427/24388660549343689307668728357759111763660922989570087116087163747073216709529418907189891430183531024686147899385989241370687309994439728955392 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (fabs.f64 v) #s(literal 1000 binary64)) A) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) density) Cd) m)) (fabs.f64 v)) (if.f64 (<=.f64 v #s(literal 99999999999999991433150857216 binary64)) (*.f64 (*.f64 (/.f64 Cd m) density) (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 v v)) A)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 v density) #s(literal -500 binary64)) m) (*.f64 A Cd)) v)))
(if.f64 (<=.f64 m #s(literal 8212393111719951/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 v A) (*.f64 #s(literal -500 binary64) density)) (/.f64 v m)) Cd) (if.f64 (<=.f64 m #s(literal 7996137162143635/5192296858534827628530496329220096 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 v density) #s(literal -500 binary64)) A) (/.f64 Cd m)) v) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) Cd) v) density) (/.f64 A m)) v)))
(if.f64 (<=.f64 m #s(literal 7475102707912205/4671939192445127903888559724237098316690665991422525368913093138328857771221685643782054718788988313373329725003360673086145233634688448510210725191395547328770042546544911308884863172860522266624 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 v A) (*.f64 #s(literal -500 binary64) density)) (/.f64 v m)) Cd) (if.f64 (<=.f64 m #s(literal 7684599350631545/5192296858534827628530496329220096 binary64)) (*.f64 (*.f64 v (*.f64 (*.f64 (*.f64 v density) A) Cd)) (/.f64 #s(literal -500 binary64) m)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) Cd) v) density) (/.f64 A m)) v)))
(if.f64 (<=.f64 m #s(literal 8237163532154153/95780971304118053647396689196894323976171195136475136 binary64)) (*.f64 (*.f64 #s(literal 1000 binary64) v) (*.f64 (*.f64 v #s(literal 1 binary64)) (*.f64 (*.f64 A (*.f64 density #s(literal -1/2 binary64))) (/.f64 Cd m)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) Cd) v) density) (/.f64 A m)) v))
(if.f64 (<=.f64 m #s(literal 7475102707912205/4671939192445127903888559724237098316690665991422525368913093138328857771221685643782054718788988313373329725003360673086145233634688448510210725191395547328770042546544911308884863172860522266624 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 v A) (*.f64 #s(literal -500 binary64) density)) (/.f64 v m)) Cd) (if.f64 (<=.f64 m #s(literal 9999999999999999464902769475481793196872414789632 binary64)) (*.f64 (*.f64 v (*.f64 (*.f64 (*.f64 v density) A) Cd)) (/.f64 #s(literal -500 binary64) m)) (*.f64 (*.f64 (*.f64 Cd (*.f64 v density)) (*.f64 (/.f64 #s(literal -500 binary64) m) A)) v)))
(if.f64 (<=.f64 m #s(literal 7203683948275289/12420144738405671481191835907700020442055088136933572889112416304208407621491015090647027270629171823603901845577048585649372640352918515131554298200329449113635639808166799244402122285052787558602103993549731750007142774830528462848 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) v) (*.f64 A density)) (/.f64 v m)) Cd) (if.f64 (<=.f64 m #s(literal 9999999999999999464902769475481793196872414789632 binary64)) (*.f64 (*.f64 v (*.f64 (*.f64 (*.f64 v density) A) Cd)) (/.f64 #s(literal -500 binary64) m)) (*.f64 (*.f64 (*.f64 Cd (*.f64 v density)) (*.f64 (/.f64 #s(literal -500 binary64) m) A)) v)))
(if.f64 (<=.f64 v #s(literal 6048387816237235/97554642197374757230674913431036447054643691958280348464348654988292866838117675628759565720734124098744591597543956965482749239977758915821568 binary64)) (*.f64 (*.f64 v (*.f64 (*.f64 (*.f64 v density) A) Cd)) (/.f64 #s(literal -500 binary64) m)) (if.f64 (<=.f64 v #s(literal 8800000 binary64)) (*.f64 Cd (*.f64 (*.f64 A density) (/.f64 (*.f64 #s(literal -500 binary64) (*.f64 v v)) m))) (if.f64 (<=.f64 v #s(literal 499999999999999992172518763398711198616762387599668526459791893706565206444511611813532878465915090404285515504459838580042126426099820904973015011723976348217763562013688300352408115712615859501189282067562627072 binary64)) (*.f64 (*.f64 A Cd) (/.f64 (*.f64 (*.f64 (*.f64 v density) #s(literal -500 binary64)) v) m)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (/.f64 A m) Cd)) (*.f64 v density)) v))))
(if.f64 (<=.f64 v #s(literal 6048387816237235/97554642197374757230674913431036447054643691958280348464348654988292866838117675628759565720734124098744591597543956965482749239977758915821568 binary64)) (*.f64 (*.f64 v (*.f64 (*.f64 (*.f64 v density) A) Cd)) (/.f64 #s(literal -500 binary64) m)) (if.f64 (<=.f64 v #s(literal 8800000 binary64)) (*.f64 Cd (*.f64 (*.f64 A density) (/.f64 (*.f64 #s(literal -500 binary64) (*.f64 v v)) m))) (if.f64 (<=.f64 v #s(literal 500000000000000028237705510260420707420313190991529187350282582077728281983789098594609880794729991489884084673768181048282990322303461938652580072801639889709891970152031159909282119041295638459799794152650876636200924348147564544 binary64)) (*.f64 (*.f64 A Cd) (/.f64 (*.f64 (*.f64 (*.f64 v density) #s(literal -500 binary64)) v) m)) (*.f64 (*.f64 v (*.f64 (*.f64 (*.f64 v density) A) Cd)) (/.f64 #s(literal -500 binary64) m)))))
(if.f64 (<=.f64 m #s(literal 9999999999999999464902769475481793196872414789632 binary64)) (*.f64 (*.f64 v (*.f64 (*.f64 (*.f64 v density) A) Cd)) (/.f64 #s(literal -500 binary64) m)) (*.f64 (*.f64 (*.f64 Cd (*.f64 v density)) (*.f64 (/.f64 #s(literal -500 binary64) m) A)) v))
(if.f64 (<=.f64 (pow.f64 (*.f64 v #s(literal 1000 binary64)) #s(literal 2 binary64)) #s(literal 2535813749451193/8452712498170643941637436558664265704301557216577944354047371344426782440907597751590676094202515006314790319892114058862117560952042968596008623655407033230534186943984081346699704282822823056848387726531379014466368452684024987821414350380272583623832617294363807973376 binary64)) (*.f64 (*.f64 A Cd) (/.f64 (*.f64 (*.f64 (*.f64 v density) #s(literal -500 binary64)) v) m)) (if.f64 (<=.f64 (pow.f64 (*.f64 v #s(literal 1000 binary64)) #s(literal 2 binary64)) #s(literal 5000000000000000000 binary64)) (*.f64 Cd (*.f64 (*.f64 A density) (/.f64 (*.f64 #s(literal -500 binary64) (*.f64 v v)) m))) (*.f64 (*.f64 A Cd) (/.f64 (*.f64 (*.f64 (*.f64 v density) #s(literal -500 binary64)) v) m))))
(if.f64 (<=.f64 density #s(literal 3602879701896397/72057594037927936 binary64)) (*.f64 Cd (*.f64 (*.f64 A density) (/.f64 (*.f64 #s(literal -500 binary64) (*.f64 v v)) m))) (*.f64 Cd (/.f64 (*.f64 A (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 v v)) density)) m)))
(*.f64 Cd (*.f64 (*.f64 A density) (/.f64 (*.f64 #s(literal -500 binary64) (*.f64 v v)) m)))
(-.f64 (*.f64 (cos.f64 Omega) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) di) (cos.f64 (*.f64 #s(literal -1/2 binary64) i))) (sin.f64 (*.f64 #s(literal -1/2 binary64) i)))) (*.f64 (*.f64 (sin.f64 Omega) dOmega) (sin.f64 (*.f64 #s(literal 1/2 binary64) i))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (+.f64 (*.f64 (sin.f64 (+.f64 f omega)) (cos.f64 omega)) (*.f64 (cos.f64 (+.f64 f omega)) (sin.f64 omega)))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 sgn req) a))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 sgn req) a))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (/.f64 (PI.f64) #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 sgn req) a))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 sgn req) a))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (/.f64 (PI.f64) #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) #s(literal 1 binary64))))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) #s(literal 1 binary64))))))))
(-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) J2)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (/.f64 (*.f64 sgn (/.f64 req a)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) J2)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (/.f64 (*.f64 sgn (/.f64 req a)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))))
(if.f64 (<=.f64 a #s(literal 8831690822831249/304541062856249971261043199621099634714882089299843985214622076787904646586450815702050470808812820600790778632231520880733099058287596688955562103009770419360352428123639782183462176734064176511024987296225574339802674935168589842054573862983405175400866837597008673346307143437247315968 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) i))))))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) i)))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 sgn req) a))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 sgn req) a))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))))
(if.f64 (<=.f64 a #s(literal 5481739131412499/609082125712499942522086399242199269429764178599687970429244153575809293172901631404100941617625641201581557264463041761466198116575193377911124206019540838720704856247279564366924353468128353022049974592451148679605349870337179684109147725966810350801733675194017346692614286874494631936 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) i))))))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) i)))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 sgn (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) J2))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) e) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 sgn (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) J2))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 (+.f64 (+.f64 omega omega) f))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal -1/3 binary64)) (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 f) (+.f64 (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal -1 binary64)) (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64))))))))) #s(literal -1 binary64))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64)))) (sin.f64 (+.f64 f (+.f64 omega omega)))) (+.f64 (*.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64))) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) #s(literal 1 binary64))))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) #s(literal 1 binary64))))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 req req) J2) sgn) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 2 binary64))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 req req) J2) sgn) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 i i)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) #s(literal 1 binary64))))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 req req) J2) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 (+.f64 i (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 req req) J2) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 req req) J2) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 (+.f64 i (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 req req) J2) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 J2 sgn) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 J2 sgn) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 req req) J2) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 (+.f64 i (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 req req) J2) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 sgn (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) J2))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) e) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 sgn (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) J2))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 (+.f64 (+.f64 omega omega) f))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal -1/3 binary64)) (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 f) (+.f64 (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal -1 binary64)) (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)))))))))
(if.f64 (<=.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 J2 sgn) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 J2 sgn) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 req req) J2) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 sgn (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 req req) J2) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 sgn (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))))
(if.f64 (<=.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 J2 sgn) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 J2 sgn) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 req (*.f64 req J2)) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 req (*.f64 req J2)) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal -1418129833677085/283625966735416996535885333662014114404918709117773906527666446555317050392228007039102232836943884008369202383078188524332921074971181050832906833858946728855699699487201666630303651778087184309051360279531753007138776532531333940154475963659030548670205136385754377903702802432 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 J2 sgn) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 J2 sgn) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 req (*.f64 req J2)) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 req (*.f64 req J2)) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal 39999999999999998177785067805944152493869701603276313043972857692358722073809085532895040844521682424136833230375778862830960513227653362344661390457675289243475435963834947863061757341511973685570170313111309910016 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 J2 sgn) req) #s(literal 1/2 binary64))) #s(literal 1/8 binary64)) e) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 J2 sgn) req) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 (+.f64 (+.f64 omega omega) f))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal -1/3 binary64)) (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 f) (+.f64 (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal -1 binary64)) (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 req (*.f64 req J2)) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 req (*.f64 req J2)) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal 100000000000000006453119872723839559654210752410289169769835957832735809325020286556271509993374515701645382788895184180192194795092289050635704895322791329123657951217763820802932736 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 J2 sgn) req) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 req (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 J2 sgn) req) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 req (*.f64 req J2)) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 req (*.f64 req J2)) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal -5000000000000000452984832 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 req req) J2) (/.f64 sgn (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 req req) J2) (/.f64 sgn (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) req)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) req)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f)))))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 req (*.f64 req J2)) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 req (*.f64 req J2)) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f))))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 req req) J2) (/.f64 sgn (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) e) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 req req) J2) (/.f64 sgn (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) f)) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 f))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 a req)) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 a req)) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 i) (fabs.f64 (sin.f64 i))) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))) #s(literal 3 binary64)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (/.f64 (neg.f64 (sin.f64 i)) (cos.f64 (+.f64 i (PI.f64))))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 i) (fabs.f64 (sin.f64 i))) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))) #s(literal 3 binary64)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (/.f64 (neg.f64 (sin.f64 i)) (cos.f64 (+.f64 i (PI.f64))))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (*.f64 (sin.f64 i) (sin.f64 i))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (/.f64 (neg.f64 (sin.f64 i)) (cos.f64 (+.f64 i (PI.f64))))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 i) (fabs.f64 (sin.f64 i))) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (/.f64 (neg.f64 (sin.f64 i)) (cos.f64 (+.f64 i (PI.f64))))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (tan.f64 i)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (/.f64 (neg.f64 (sin.f64 i)) (cos.f64 (+.f64 i (PI.f64))))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (tan.f64 i)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (tan.f64 i)))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (tan.f64 i)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (sin.f64 (+.f64 (neg.f64 (+.f64 omega omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (tan.f64 i)))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 req (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) req)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) req)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (tan.f64 i)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (sin.f64 (+.f64 (neg.f64 (+.f64 omega omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (tan.f64 i)))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 req (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) req)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) req)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (tan.f64 i))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 1000000000000000016976219238238959704141045173573106739630601035115997744067216908958262325956255112879408454231155599236459402033650892537856 binary64)) (*.f64 (*.f64 (/.f64 req (*.f64 (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 8 binary64))) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 J2 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) (*.f64 e sgn))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i)))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (*.f64 (/.f64 req (*.f64 (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 8 binary64))) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i)))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))))
(*.f64 (*.f64 (/.f64 req (*.f64 (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 8 binary64))) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i)))))) (cos.f64 (+.f64 omega omega))))
(*.f64 (*.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega))) (/.f64 req (*.f64 (*.f64 #s(literal 8 binary64) a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) e) (-.f64 #s(literal 1 binary64) (*.f64 e e))))
(if.f64 (<=.f64 req #s(literal -1600000000 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64))) (cos.f64 (+.f64 omega omega))) (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)) (if.f64 (<=.f64 req #s(literal 3022314549036573/18889465931478580854784 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 req req)) J2) sgn) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega))) (*.f64 (neg.f64 req) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 J2 sgn)) req))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e))))
(if.f64 (<=.f64 req #s(literal -1600000000 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega))) (*.f64 req (/.f64 req (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a)))) (*.f64 (*.f64 #s(literal 1/16 binary64) J2) (/.f64 sgn (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)) (if.f64 (<=.f64 req #s(literal 3022314549036573/18889465931478580854784 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 req req)) J2) sgn) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega))) (*.f64 (neg.f64 req) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 J2 sgn)) req))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e))))
(if.f64 (<=.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) #s(literal +inf.0 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega))) (*.f64 req (/.f64 req (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a)))) (*.f64 (*.f64 #s(literal 1/16 binary64) J2) (/.f64 sgn (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (*.f64 (cos.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 req req)) J2) sgn))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)))
(if.f64 (<=.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) #s(literal +inf.0 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega))) (*.f64 (neg.f64 req) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 J2 sgn)) req))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (*.f64 (cos.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 req req)) J2) sgn))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)))
(if.f64 (<=.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 e (*.f64 (*.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (*.f64 req req)) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 J2 sgn)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64)))))) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (*.f64 (cos.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 req req)) J2) sgn))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)))
(if.f64 (<=.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) #s(literal 6176826577981891/12353653155963782858428671064387042666598916611580939841119467653041402561523153496823753888027168243114445670429492914513538130943957121390808923336226715693451991227817771079374200911992994161452622538969283756626099089564495403968390097390695773702442020050803147555684412513136627351818013153603882218219464583806976 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 e (*.f64 (*.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (*.f64 req req)) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 J2 sgn)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 req req)) J2) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)))
(if.f64 (<=.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) #s(literal 6176826577981891/12353653155963782858428671064387042666598916611580939841119467653041402561523153496823753888027168243114445670429492914513538130943957121390808923336226715693451991227817771079374200911992994161452622538969283756626099089564495403968390097390695773702442020050803147555684412513136627351818013153603882218219464583806976 binary64)) (*.f64 (*.f64 (*.f64 req req) (*.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 J2 sgn)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 req req)) J2) sgn) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)))
(*.f64 (*.f64 (*.f64 req req) (*.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 J2 sgn)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (cos.f64 (+.f64 omega omega))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e))
(if.f64 (<=.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal +inf.0 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal -3 binary64))) #s(literal -1 binary64)))) (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal -3 binary64) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))))) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a)) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))))))
(if.f64 (<=.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal +inf.0 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal -3 binary64))) #s(literal -1 binary64)))) (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal -3 binary64) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sin.f64 (+.f64 (neg.f64 (+.f64 omega omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a)) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))))
(if.f64 (<=.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal +inf.0 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (*.f64 e e) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal -3 binary64) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sin.f64 (+.f64 (neg.f64 (+.f64 omega omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a)) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))))
(if.f64 (<=.f64 (cos.f64 i) #s(literal 5548434740920451/9007199254740992 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) a) (*.f64 (*.f64 J2 sgn) (*.f64 (/.f64 req a) req)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) a) (*.f64 (*.f64 J2 sgn) (*.f64 (/.f64 req a) req))))) (*.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) a) (*.f64 (*.f64 J2 sgn) (*.f64 (/.f64 req a) req)))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega)))))))) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (*.f64 e e) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (*.f64 e e) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))))))
(if.f64 (<=.f64 (cos.f64 i) #s(literal 5584463537939415/9007199254740992 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) a) (*.f64 (*.f64 J2 sgn) (*.f64 (/.f64 req a) req)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) a) (*.f64 (*.f64 J2 sgn) (*.f64 (/.f64 req a) req))))) (*.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) a) (*.f64 (*.f64 J2 sgn) (*.f64 (/.f64 req a) req)))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega)))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))))
(if.f64 (<=.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sin.f64 (+.f64 (neg.f64 (+.f64 omega omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) J2)) a) (/.f64 sgn a)) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal -inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) J2)) sgn) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sin.f64 (+.f64 (neg.f64 (+.f64 omega omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) J2)) sgn) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal -9999999999999999918388610622944277578633427011520373324179896670642961784527024602806390495869308408470337715685294734193992593398889846197223766553446979093051960385337504355687757672562640543404353314227442034427503713670135808 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) J2)) sgn) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sin.f64 (+.f64 (neg.f64 (+.f64 omega omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) J2)) sgn) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 req (*.f64 J2 sgn)) (+.f64 a a)) (/.f64 req a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 (*.f64 req (*.f64 J2 sgn)) (+.f64 a a)) (/.f64 req a))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 J2 sgn)) (+.f64 a a)) (/.f64 req a)) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal -9999999999999999918388610622944277578633427011520373324179896670642961784527024602806390495869308408470337715685294734193992593398889846197223766553446979093051960385337504355687757672562640543404353314227442034427503713670135808 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) J2)) sgn) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sin.f64 (+.f64 (neg.f64 (+.f64 omega omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) J2)) sgn) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) req) (*.f64 J2 sgn)) #s(literal 1 binary64)) (*.f64 (+.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (*.f64 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) req) (*.f64 J2 sgn)) (+.f64 a a)) (-.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) req) (*.f64 J2 sgn)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (+.f64 a a) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal -500000000000000018859392646528275145870896857085503962335168289281777326942195222496809523118074794646537707054543694849827765791617457405378002815009462711564396596395540433461110399996001662305042432 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 req (*.f64 a a)) req)) J2) sgn) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 req (*.f64 a a)) req)) J2) sgn)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 req (*.f64 a a)) req)) J2) sgn) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) req) (*.f64 J2 sgn)) #s(literal 1 binary64)) (*.f64 (+.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (*.f64 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) req) (*.f64 J2 sgn)) (+.f64 a a)) (-.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) req) (*.f64 J2 sgn)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (+.f64 a a) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) req) (*.f64 J2 sgn)) #s(literal 1 binary64)) (*.f64 (+.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (*.f64 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) req) (*.f64 J2 sgn)) (+.f64 a a)) (-.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) req) (*.f64 J2 sgn)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (+.f64 a a) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(if.f64 (<=.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 (+.f64 omega omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (*.f64 req req)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal 1/8 binary64)) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (*.f64 (/.f64 req (*.f64 a a)) req))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (*.f64 req req)) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal -3 binary64) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(if.f64 (<=.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))))) #s(literal 20000000000000 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) J2)) sgn) #s(literal 1/8 binary64)) e) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 (*.f64 req (*.f64 (/.f64 req (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn))) (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 (+.f64 omega omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (*.f64 req req)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal 1/8 binary64)) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (*.f64 (/.f64 req (*.f64 a a)) req))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (*.f64 req req)) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal -3 binary64) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 J2 sgn)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal 1/8 binary64)) e) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 (*.f64 req (*.f64 (/.f64 req (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn))) (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req req) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) J2)) sgn) #s(literal 1/8 binary64)) e) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 (*.f64 req (*.f64 (/.f64 req (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn))) (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 req req) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) J2)) sgn) #s(literal 1/8 binary64)) e) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 req (*.f64 (*.f64 (/.f64 req (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)) (-.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal -3 binary64))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req req) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(if.f64 (<=.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal +inf.0 binary64)) (-.f64 (neg.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 e #s(literal 2 binary64)) (*.f64 (cos.f64 i) (+.f64 (+.f64 #s(literal 11 binary64) (/.f64 (*.f64 #s(literal 80 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 6 binary64) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (neg.f64 (*.f64 #s(literal 3 binary64) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))) (neg.f64 (*.f64 (*.f64 #s(literal 3 binary64) e) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))))) (neg.f64 (*.f64 e (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) (-.f64 (neg.f64 (*.f64 (/.f64 (/.f64 (*.f64 req (*.f64 (/.f64 J2 #s(literal 2 binary64)) (/.f64 (*.f64 sgn req) a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 8 binary64)) (*.f64 (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))) (*.f64 (cos.f64 i) (sin.f64 (+.f64 omega omega)))) (*.f64 e e)))) (*.f64 (/.f64 (/.f64 (*.f64 req (*.f64 (/.f64 J2 #s(literal 2 binary64)) (/.f64 (*.f64 sgn req) a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 6 binary64) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (neg.f64 (*.f64 #s(literal 3 binary64) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))) (neg.f64 (*.f64 (*.f64 #s(literal 3 binary64) e) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))))) (neg.f64 (*.f64 e (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))))
(if.f64 (<=.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (cos.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (neg.f64 (*.f64 (/.f64 (/.f64 (*.f64 req (*.f64 (/.f64 J2 #s(literal 2 binary64)) (/.f64 (*.f64 sgn req) a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 8 binary64)) (*.f64 (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))) (*.f64 (cos.f64 i) (sin.f64 (+.f64 omega omega)))) (*.f64 e e)))) (*.f64 (/.f64 (/.f64 (*.f64 req (*.f64 (/.f64 J2 #s(literal 2 binary64)) (/.f64 (*.f64 sgn req) a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 6 binary64) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (neg.f64 (*.f64 #s(literal 3 binary64) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))) (neg.f64 (*.f64 (*.f64 #s(literal 3 binary64) e) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))))) (neg.f64 (*.f64 e (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))))
(if.f64 (<=.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (neg.f64 (*.f64 (/.f64 (/.f64 (*.f64 req (*.f64 (/.f64 J2 #s(literal 2 binary64)) (/.f64 (*.f64 sgn req) a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 8 binary64)) (*.f64 (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))) (*.f64 (cos.f64 i) (sin.f64 (+.f64 omega omega)))) (*.f64 e e)))) (*.f64 (/.f64 (/.f64 (*.f64 req (*.f64 (/.f64 J2 #s(literal 2 binary64)) (/.f64 (*.f64 sgn req) a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 6 binary64) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (neg.f64 (*.f64 #s(literal 3 binary64) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))) (neg.f64 (*.f64 (*.f64 #s(literal 3 binary64) e) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))))) (neg.f64 (*.f64 e (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 357986298980937/7159725979618740301104695983418709622680434793042663132360362425577766001338226039836321066456157093857339877304749930018599215189268344175111256510391144905128218576994803025566700315369744694061260002057936311868982638401684395903839696776618573824 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) #s(literal 1/2 binary64)) J2) sgn) (/.f64 #s(literal -1/8 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 1999999999999999968690075053594844794467049550398674105839167574826260825778046447254131513863660361617142062017839354320168505704399283619892060046895905392871054248054753201409632462850463438004757128270250508288 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))))
(if.f64 (<=.f64 (-.f64 (neg.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 e #s(literal 2 binary64)) (*.f64 (cos.f64 i) (+.f64 (+.f64 #s(literal 11 binary64) (/.f64 (*.f64 #s(literal 80 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 6 binary64) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (neg.f64 (*.f64 #s(literal 3 binary64) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))) (neg.f64 (*.f64 (*.f64 #s(literal 3 binary64) e) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))))) (neg.f64 (*.f64 e (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (sin.f64 (+.f64 (-.f64 (neg.f64 i) i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (sin.f64 (+.f64 (-.f64 (neg.f64 i) i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (sin.f64 (+.f64 (-.f64 (neg.f64 i) i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 357986298980937/7159725979618740301104695983418709622680434793042663132360362425577766001338226039836321066456157093857339877304749930018599215189268344175111256510391144905128218576994803025566700315369744694061260002057936311868982638401684395903839696776618573824 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) #s(literal 1/2 binary64)) J2) sgn) (/.f64 #s(literal -1/8 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 357986298980937/7159725979618740301104695983418709622680434793042663132360362425577766001338226039836321066456157093857339877304749930018599215189268344175111256510391144905128218576994803025566700315369744694061260002057936311868982638401684395903839696776618573824 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))))
(-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 J2 sgn) req) (+.f64 a a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 J2 sgn) req) (+.f64 a a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 357986298980937/7159725979618740301104695983418709622680434793042663132360362425577766001338226039836321066456157093857339877304749930018599215189268344175111256510391144905128218576994803025566700315369744694061260002057936311868982638401684395903839696776618573824 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 req (/.f64 req (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 req (/.f64 req (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 req (/.f64 req (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 req (/.f64 req (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 req (/.f64 req (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))
(-.f64 (*.f64 (*.f64 (-.f64 (-.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5 binary64)) #s(literal 2 binary64))) #s(literal -80 binary64)) #s(literal -11 binary64)) (*.f64 (pow.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5 binary64))) #s(literal 1/2 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))))) (*.f64 (*.f64 (cos.f64 i) e) e)) (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) #s(literal -1/8 binary64))) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))
(-.f64 (*.f64 (sin.f64 Omega) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) di) (cos.f64 (*.f64 #s(literal -1/2 binary64) i))) (sin.f64 (*.f64 #s(literal -1/2 binary64) i)))) (*.f64 (*.f64 (cos.f64 Omega) (sin.f64 (*.f64 #s(literal -1/2 binary64) i))) dOmega))
(+.f64 a (*.f64 (*.f64 a (/.f64 req a)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) omega)) (cos.f64 (*.f64 #s(literal -2 binary64) f))) (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) omega)) (sin.f64 (*.f64 #s(literal -2 binary64) f))))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))))))))
(if.f64 (<=.f64 (pow.f64 (cos.f64 i) #s(literal 2 binary64)) #s(literal 4503149267407759/4503599627370496 binary64)) (+.f64 a (*.f64 (*.f64 a (/.f64 req a)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))))))))) (+.f64 a (*.f64 (*.f64 a (/.f64 #s(literal 1 binary64) (/.f64 a req))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a req))) J2) sgn) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))))))))))
(+.f64 a (*.f64 (*.f64 a (/.f64 #s(literal 1 binary64) (/.f64 a req))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a req))) J2) sgn) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))))))))
(+.f64 a (*.f64 (*.f64 a (/.f64 req a)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64))))))))
(+.f64 a (*.f64 (*.f64 a (/.f64 req a)) (*.f64 J2 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) (*.f64 sgn (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 3 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -3/2 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal 3/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1 binary64)))))))))
(+.f64 a (*.f64 a (/.f64 (*.f64 req (*.f64 J2 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) (*.f64 sgn (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 3 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -3/2 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal 3/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1 binary64)))))))) a)))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (*.f64 (/.f64 (/.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -3/2 binary64)) #s(literal -3 binary64)) (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)) #s(literal 1 binary64)))) req) a) a) req)))))
(+.f64 a (*.f64 a (*.f64 (*.f64 sgn (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (/.f64 req (*.f64 a a))) (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -3/2 binary64)) #s(literal -3 binary64)) (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)) #s(literal 1 binary64)))))) req)))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 3 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -3/2 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal 3/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1 binary64)))) req) (*.f64 (/.f64 req (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) J2))))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -3/2 binary64)) #s(literal -3 binary64)) (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)) #s(literal 1 binary64)))) req) (*.f64 a a)) req)))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 req (*.f64 a a)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 3 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal -3/2 binary64)) #s(literal -3/2 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal 3/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1 binary64))))) req)))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 req (*.f64 a a)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 3 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -3/2 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal 3/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1 binary64))))) req)))))
(+.f64 a (*.f64 a (*.f64 J2 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req (*.f64 a a))) (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -3/2 binary64)) #s(literal -3 binary64)) (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)) #s(literal 1 binary64)))) req)) sgn))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 825460204899477/16509204097989538948510618278641143953713978938628797566498772157083559454897651858575539246489287121708574843539285271215073361234458923039079343076966861778387083874968908880272859927388326282907007278381599637629625884148486304338699903086469889890298080653054312448 binary64)) (-.f64 (+.f64 (+.f64 (+.f64 (+.f64 M omega) Omega) (*.f64 (/.f64 (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 req req) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (/.f64 (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 req req) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) #s(literal 4 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 #s(literal 6 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))))) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (*.f64 (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 req req) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) #s(literal 16 binary64)) (*.f64 (+.f64 (+.f64 (+.f64 #s(literal 2 binary64) (pow.f64 e #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(literal 11 binary64) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 e #s(literal 2 binary64))))) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))) (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 40 binary64) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 e #s(literal 2 binary64))))) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 #s(literal 400 binary64) (pow.f64 e #s(literal 2 binary64))) (pow.f64 (cos.f64 i) #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 req req) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 e #s(literal 2 binary64)) (*.f64 (cos.f64 i) (+.f64 (+.f64 #s(literal 11 binary64) (/.f64 (*.f64 #s(literal 80 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (/.f64 (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 req req) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 6 binary64) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (neg.f64 (*.f64 #s(literal 3 binary64) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))) (neg.f64 (*.f64 (*.f64 #s(literal 3 binary64) e) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))))) (neg.f64 (*.f64 e (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) (+.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (sin.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)))))) (-.f64 #s(literal 3 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal -6 binary64)) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/4 binary64))) (-.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 e e) (cos.f64 i))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64))))) (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/16 binary64)) (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal 22 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))) (-.f64 (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 200 binary64) (*.f64 e e)) #s(literal 80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) (*.f64 e e)) (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal -1/2 binary64)) (cos.f64 i)) (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (neg.f64 (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (sin.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega))))))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))))))
(+.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (sin.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)))))) (-.f64 #s(literal 3 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal -6 binary64)) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/4 binary64))) (-.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 e e) (cos.f64 i))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64))))) (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/16 binary64)) (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal 22 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))) (-.f64 (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 200 binary64) (*.f64 e e)) #s(literal 80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) (*.f64 e e)) (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal -1/2 binary64)) (cos.f64 i)) (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (neg.f64 (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (sin.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega))))))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))))
(-.f64 (+.f64 Omega (+.f64 omega M)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) a)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 #s(literal -1/8 binary64) (sin.f64 (+.f64 omega omega)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) a)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal 1/4 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))))) (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) a)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal 1/8 binary64)) (*.f64 e e)) (cos.f64 i)) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64))))) (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) a)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal 1/16 binary64)) (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e)))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) a)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))))))
(-.f64 (+.f64 Omega (+.f64 omega M)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) a)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 #s(literal -1/8 binary64) (sin.f64 (+.f64 omega omega)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) a)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal 1/4 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))) (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal 1/16 binary64)) (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 e e))) (cos.f64 i)) (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 80 binary64)) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e)) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))))))
(-.f64 (+.f64 (-.f64 (+.f64 (+.f64 omega M) Omega) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal -1/8 binary64)) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 (*.f64 a a) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (+.f64 (*.f64 (-.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 #s(literal -3 binary64) (+.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (*.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal -6 binary64)))))) (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal 1/16 binary64)) (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 e e))) (cos.f64 i)) (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 80 binary64)) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e)) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))))
(-.f64 (+.f64 (+.f64 omega M) Omega) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 req req)) (*.f64 (sin.f64 (+.f64 omega omega)) #s(literal -1/8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 req req)) #s(literal 1/4 binary64)) (+.f64 (*.f64 (-.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 #s(literal -3 binary64) (+.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (*.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal -6 binary64))))) (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 req req)) #s(literal 1/16 binary64)) (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e))))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 req req)) (*.f64 #s(literal 1/8 binary64) (*.f64 e e))) (cos.f64 i)) (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 80 binary64)) (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 req req)) (*.f64 #s(literal -1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e)) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))))))
(pow.f64 #s(literal 10 binary64) (-.f64 #s(literal -503/40 binary64) (-.f64 (-.f64 (-.f64 (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal 10000/2928563 binary64) alt) #s(literal 5268000/2928563 binary64)) #s(literal 4 binary64)) #s(literal 5269/10000 binary64)) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal 10000/2928563 binary64) alt) #s(literal 5268000/2928563 binary64)) #s(literal 6 binary64)) #s(literal 34047/100000 binary64))) (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) (-.f64 #s(literal 23024/2928563 binary64) (*.f64 (*.f64 (-.f64 #s(literal -60713/100000 binary64) (*.f64 #s(literal -10036/2928563 binary64) (-.f64 #s(literal 2634/5 binary64) alt))) #s(literal 100000000/8576481244969 binary64)) (-.f64 #s(literal 2634/5 binary64) alt))))) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal 10000/2928563 binary64) alt) #s(literal 5268000/2928563 binary64)) #s(literal 5 binary64)) #s(literal -5889/10000 binary64)))))
(pow.f64 #s(literal 10 binary64) (-.f64 #s(literal -503/40 binary64) (-.f64 (-.f64 (-.f64 (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 4 binary64)) #s(literal 5269/10000 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 6 binary64)) #s(literal 34047/100000 binary64))) (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) (-.f64 #s(literal 23024/2928563 binary64) (*.f64 (*.f64 (-.f64 #s(literal -60713/100000 binary64) (*.f64 #s(literal -10036/2928563 binary64) (-.f64 #s(literal 2634/5 binary64) alt))) #s(literal 100000000/8576481244969 binary64)) (-.f64 #s(literal 2634/5 binary64) alt))))) (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 5 binary64)) #s(literal -5889/10000 binary64)))))
(pow.f64 #s(literal 10 binary64) (-.f64 #s(literal -503/40 binary64) (-.f64 (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 4 binary64)) #s(literal 5269/10000 binary64)) (-.f64 (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -100000000/8576481244969 binary64) (-.f64 #s(literal -60713/100000 binary64) (*.f64 #s(literal -10036/2928563 binary64) (-.f64 #s(literal 2634/5 binary64) alt)))) (-.f64 #s(literal 2634/5 binary64) alt)) #s(literal -23024/2928563 binary64)) (-.f64 #s(literal 2634/5 binary64) alt)) (*.f64 #s(literal -34047/100000 binary64) (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 6 binary64)))) (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 5 binary64)) #s(literal 5889/10000 binary64))))))
(*.f64 (sqrt.f64 (fabs.f64 p)) (sqrt.f64 (fabs.f64 mu)))
(sqrt.f64 (*.f64 mu p))
(/.f64 (+.f64 (neg.f64 N) (-.f64 (-.f64 N (*.f64 (*.f64 e N) (cosh.f64 N))) (-.f64 N (*.f64 (sinh.f64 N) e)))) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)))
(/.f64 (-.f64 (-.f64 (-.f64 N (*.f64 (*.f64 (cosh.f64 N) e) N)) (-.f64 N (*.f64 (sinh.f64 N) e))) N) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)))
(/.f64 (-.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)) N) (-.f64 N (*.f64 (sinh.f64 N) e))) N) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)))
(/.f64 (+.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cosh.f64 N) e) #s(literal 1 binary64)) N) (*.f64 (sinh.f64 N) e)) (+.f64 N N)) (-.f64 (*.f64 (cosh.f64 N) e) #s(literal 1 binary64)))
(-.f64 N (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 N N) (sinh.f64 N)) e) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e))) (sinh.f64 N)))
(if.f64 (<=.f64 (-.f64 N (/.f64 (-.f64 (-.f64 (*.f64 e (sinh.f64 N)) N) N) (-.f64 (*.f64 e (cosh.f64 N)) #s(literal 1 binary64)))) #s(literal 0 binary64)) (-.f64 N (/.f64 (-.f64 (*.f64 (sinh.f64 N) e) (+.f64 N N)) (-.f64 (*.f64 e (cosh.f64 N)) #s(literal 1 binary64)))) (-.f64 N (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cosh.f64 N) e) #s(literal 1 binary64)) (-.f64 (-.f64 (*.f64 (sinh.f64 N) e) N) N)))))
(-.f64 N (/.f64 (-.f64 (*.f64 (sinh.f64 N) e) (+.f64 N N)) (-.f64 (*.f64 e (cosh.f64 N)) #s(literal 1 binary64))))
(-.f64 M (/.f64 (*.f64 (sin.f64 M) e) (-.f64 (*.f64 (cos.f64 M) e) #s(literal 1 binary64))))
(*.f64 (atan.f64 (/.f64 (tanh.f64 (*.f64 #s(literal 1/2 binary64) H)) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) e) (-.f64 #s(literal -1 binary64) e))))) #s(literal 2 binary64))
(*.f64 (atan.f64 (*.f64 (tanh.f64 (*.f64 #s(literal 1/2 binary64) H)) (sqrt.f64 (/.f64 (-.f64 #s(literal -1 binary64) e) (-.f64 #s(literal 1 binary64) e))))) #s(literal 2 binary64))
(-.f64 (*.f64 e (sinh.f64 H)) H)
(*.f64 #s(literal 2 binary64) (atan2.f64 (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) e)) (sin.f64 (/.f64 Ecc #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 (fabs.f64 (+.f64 (*.f64 (neg.f64 e) #s(literal 2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 (/.f64 Ecc #s(literal 2 binary64))))))
(*.f64 (*.f64 (atan2.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) Ecc)) (sqrt.f64 (-.f64 e #s(literal -1 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) Ecc)) (sqrt.f64 (-.f64 #s(literal 1 binary64) e)))) #s(literal 1/2 binary64)) #s(literal 4 binary64))
(*.f64 (atan2.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) Ecc)) (sqrt.f64 (-.f64 e #s(literal -1 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) Ecc)) (sqrt.f64 (-.f64 #s(literal 1 binary64) e)))) #s(literal 2 binary64))
(-.f64 Ecc (*.f64 e (sin.f64 Ecc)))