(if.f64 (<=.f64 h #s(literal 200000000000000 binary64)) (*.f64 (*.f64 (/.f64 (sin.f64 i) h) mu) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))) (*.f64 (neg.f64 (sin.f64 i)) (*.f64 (/.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) h) (neg.f64 mu))))
(if.f64 (<=.f64 (neg.f64 (/.f64 mu h)) #s(literal -499999999999999969129150412640989270163513682236062239147208106269435745912299856818410263751954127650816 binary64)) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (/.f64 (sin.f64 i) h)) mu) (if.f64 (<=.f64 (neg.f64 (/.f64 mu h)) #s(literal -3148880786512287/15744403932561434696684473303452629045213679255131528440951130063136634306810047014785327192773139116009306758441243430342744218096217082060889571263281690386187633395165356521866664817226721079737670210248565328244806179188238434160900023542852296724603729870848 binary64)) (*.f64 (*.f64 (/.f64 mu h) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))) (sin.f64 i)) (*.f64 (*.f64 (sin.f64 i) mu) (/.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) h))))
(if.f64 (<=.f64 h #s(literal 2076918743413931/41538374868278621028243970633760768 binary64)) (*.f64 (*.f64 (/.f64 (sin.f64 i) h) mu) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))) (*.f64 (*.f64 (sin.f64 i) mu) (/.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) h)))
(if.f64 (<=.f64 (neg.f64 (/.f64 mu h)) #s(literal -40000000000000002469113341114686275479774892438520450332402114021552535061586862357701566837778591867772418338059650452413836314173582468695284614146794891421703640843664752874453897213525501450909354384098510897997938503156139212326160449694681680764853030332740522014435580368453040603136 binary64)) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (/.f64 (sin.f64 i) h)) mu) (if.f64 (<=.f64 (neg.f64 (/.f64 mu h)) #s(literal -5515652263101987/5515652263101987298728728207430913795608113109085112352897269396216198887424215820128660001943808587833784893551335930816647064191168732319583111500951066614122648616177179922993422016587311577585463592732098692120576 binary64)) (*.f64 (*.f64 (sin.f64 i) (/.f64 mu h)) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (/.f64 (sin.f64 i) h)) mu)))
(if.f64 (<=.f64 mu #s(literal 405953734519727/69992023193056381579920071267763883691301421788582797965624659405118495974380029543152421664737722368 binary64)) (*.f64 (*.f64 (sin.f64 i) (/.f64 mu h)) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))) (*.f64 (*.f64 (sin.f64 i) mu) (/.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) h)))
(*.f64 (*.f64 (sin.f64 i) mu) (/.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) h))
(*.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 AN)) (cos.f64 i)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h))
(*.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 (/.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 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (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 a (*.f64 (*.f64 e a) e))
(*.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) (sin.f64 AN)) r) (*.f64 (*.f64 (cos.f64 i) r) (*.f64 (sin.f64 theta) (cos.f64 AN))))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) r) (sin.f64 AN)) (*.f64 (*.f64 (cos.f64 i) r) (*.f64 (sin.f64 theta) (cos.f64 AN))))
(*.f64 r (+.f64 (*.f64 (sin.f64 AN) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 i) (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 (cos.f64 i) (sin.f64 AN)) (sin.f64 theta))))
(/.f64 p (+.f64 #s(literal 1 binary64) (/.f64 e (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 f))))))
(/.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 #s(literal 2 binary64) (atan2.f64 (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) e)) (sin.f64 (*.f64 f #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 e #s(literal -1 binary64)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 f #s(literal 1/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 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -5000000000000000164943055170434837427135440057522539318423791570869012863893044939457394359293162206430058690814701199200294101105758807930912040583618895295566352963538529190225559103961304787468696490024321895827150961861074155612506360583410417131562672326958643646649953541871894528 binary64)) (*.f64 Cd (/.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) density) v) (*.f64 v A)) m)) (if.f64 (<=.f64 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -375375841440235/938439603600587528746394711938657107663969949193687942084737423845328945327403963493426274822541422606069252398088182827397836333287780407720182613329988145004965865323862822167078543736143176539997470989737828269291292380585577139908076735904949708259328 binary64)) (*.f64 (*.f64 #s(literal 1000000 binary64) v) (*.f64 v (*.f64 #s(literal -1/2000 binary64) (*.f64 (/.f64 (*.f64 A Cd) m) density)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) v) Cd) (/.f64 A m)) (*.f64 v density))))
(if.f64 (<=.f64 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -inf.0 binary64)) (*.f64 Cd (/.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) density) v) (*.f64 v A)) m)) (if.f64 (<=.f64 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -7238468646072529/24128228820241763395368498172630942708201009006994023127186460259846489377974909173483894312553062974832901700057603348659254161999916252716423678391067804088773420366831584139402736156236316721587153396424382337160349784305655085875761908966202683012582070411724897569696118189719975296519556940632582457459891765248 binary64)) (*.f64 v (*.f64 (*.f64 #s(literal 1000000 binary64) v) (*.f64 #s(literal -1/2000 binary64) (*.f64 (/.f64 (*.f64 A Cd) m) density)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) v) Cd) (/.f64 A m)) (*.f64 v density))))
(if.f64 (<=.f64 m #s(literal 5609415803011879/38685626227668133590597632 binary64)) (*.f64 Cd (*.f64 (*.f64 (/.f64 density m) (*.f64 #s(literal -500 binary64) v)) (*.f64 v A))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) v) Cd) (/.f64 A m)) (*.f64 v density)))
(if.f64 (<=.f64 m #s(literal 270000000000000000049227040048039851831853056 binary64)) (*.f64 Cd (*.f64 (*.f64 (/.f64 density m) (*.f64 #s(literal -500 binary64) v)) (*.f64 v A))) (*.f64 Cd (/.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) density) v) (*.f64 v A)) m)))
(*.f64 Cd (*.f64 (*.f64 (/.f64 density m) (*.f64 #s(literal -500 binary64) v)) (*.f64 v A)))
(-.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 (sin.f64 f) (*.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 (neg.f64 (*.f64 (sin.f64 i) #s(literal 3 binary64))) (*.f64 (sin.f64 i) (-.f64 (*.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 binary64) (*.f64 (cos.f64 f) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #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))) (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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 1/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 1/2 binary64)))))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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))))))))))
(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 (-.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (cos.f64 (*.f64 #s(literal -3 binary64) f))) (*.f64 (cos.f64 (+.f64 omega omega)) (sin.f64 (*.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 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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 1/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 1/2 binary64)))))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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))))))))))
(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 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)) (*.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 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)) (*.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)))) (+.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (cos.f64 f)) (*.f64 (cos.f64 (+.f64 omega omega)) (sin.f64 f)))) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (*.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/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 (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 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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 1/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 1/2 binary64)))))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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))))))))))
(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 (*.f64 (*.f64 (*.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 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (sin.f64 (+.f64 (+.f64 f omega) omega))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (-.f64 (*.f64 (neg.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 (*.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/3 binary64))) (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) #s(literal 3 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 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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 1/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 1/2 binary64)))))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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))))))))))
(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 (-.f64 (*.f64 (*.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 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (-.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) (-.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 binary64) (*.f64 (cos.f64 f) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #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))) (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))))))) (*.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 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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 1/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 1/2 binary64)))))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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))))))))))
(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 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (*.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/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 (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 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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 1/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 1/2 binary64)))))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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))))))))))
(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 (/.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))))))) (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 (/.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)))))) (*.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 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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 1/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 1/2 binary64)))))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)))) #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))))))))))
(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 (/.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))))))) (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 (/.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)))))) (*.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 (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)) (*.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) (-.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 1/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 1/2 binary64)))))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 req a)) (*.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))))))))))
(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 (/.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))))))) (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 (/.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)))))) (*.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 req (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (*.f64 #s(literal 1/2 binary64) J2)) sgn))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (sin.f64 (-.f64 i (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #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 (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.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))))))))
(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 (*.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) J2)) sgn))) (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 (*.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) J2)) sgn)) (*.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 req (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (*.f64 #s(literal 1/2 binary64) J2)) sgn))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (sin.f64 (-.f64 i (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #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 (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.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))))))))
(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 (*.f64 req (/.f64 (/.f64 req (*.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) J2)) sgn))) (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 (*.f64 req (/.f64 (/.f64 req (*.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) J2)) sgn)) (*.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 req (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (*.f64 #s(literal 1/2 binary64) J2)) sgn))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (sin.f64 (-.f64 i (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #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 (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.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))))))))
(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 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) J2))) sgn))) (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 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) J2))) sgn)) (*.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 req (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (*.f64 #s(literal 1/2 binary64) J2)) sgn))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (sin.f64 (-.f64 i (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #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 (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.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 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) J2))) sgn))) (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 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) J2))) sgn)) (*.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)))))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal 1000000000000000052504760255204420248704468581108159154915854115511802457988908195786371375080447864043704443832883878176942523235360430575644792184786706982848387200926575803737830233794788090059368953234970799945081119038967640880074652742780142494579258788820056842838115669472196386865459400540160 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (/.f64 (*.f64 #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 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 req a) (*.f64 (/.f64 req a) (/.f64 (*.f64 #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 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (fabs.f64 (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 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.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 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 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 (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))))))))))
(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 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) 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 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 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)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (/.f64 (*.f64 #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)))))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.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 #s(literal -2 binary64))) (cos.f64 (*.f64 omega #s(literal -2 binary64)))) (*.f64 (sin.f64 (*.f64 f #s(literal -2 binary64))) (sin.f64 (*.f64 omega #s(literal -2 binary64)))))) #s(literal 3 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) 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 (+.f64 (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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)))))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.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)))))))
(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 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) 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 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 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)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (/.f64 (*.f64 #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))))))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.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 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (/.f64 (*.f64 #s(literal 1/8 binary64) e) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 e (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 (-.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 req (*.f64 a a)) req)) (/.f64 (*.f64 #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))))) (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i))) (-.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e)))))))
(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 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) 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 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 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)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (/.f64 (*.f64 #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))))))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.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 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) 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 (+.f64 (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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)))))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.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)))))))
(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 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) 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 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 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)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (/.f64 (*.f64 #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)))))) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 (+.f64 f omega) omega)) e)) #s(literal 3 binary64))) (fabs.f64 (sin.f64 i))) (cos.f64 i)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (/.f64 (*.f64 #s(literal 1/8 binary64) e) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 e (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 (-.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 req (*.f64 a a)) req)) (/.f64 (*.f64 #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))))) (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i))) (-.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e)))))))
(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 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) 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 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 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)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (/.f64 (*.f64 #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)))))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.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 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (/.f64 (*.f64 #s(literal 1/8 binary64) e) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 e (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 (-.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 req (*.f64 a a)) req)) (/.f64 (*.f64 #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))))) (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i))) (-.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e)))))))
(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 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (/.f64 (*.f64 #s(literal 1/8 binary64) e) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 e (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 (-.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 req a) (/.f64 req a))) (/.f64 (*.f64 #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))))) (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i))) (-.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (/.f64 (*.f64 #s(literal 1/8 binary64) e) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 e (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 (-.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 req (*.f64 a a)) req)) (/.f64 (*.f64 #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))))) (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i))) (-.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e)))))))
(-.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/8 binary64) e) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 e (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 (-.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 req a) (/.f64 req a))) (/.f64 (*.f64 #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))))) (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i))) (-.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e))))))
(-.f64 (/.f64 (*.f64 (-.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 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (/.f64 (*.f64 #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)))))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.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 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (/.f64 (*.f64 #s(literal 1/8 binary64) e) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 e (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 (-.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 req (*.f64 a a)) req)) (/.f64 (*.f64 #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))))) (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i))) (-.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e))))))
(-.f64 (/.f64 (*.f64 (-.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 (*.f64 (/.f64 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (/.f64 (*.f64 #s(literal 1/8 binary64) e) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 e (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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)))))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.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 req (*.f64 a a)) req) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (/.f64 (*.f64 #s(literal 1/8 binary64) e) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 e (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 (-.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 req (*.f64 a a)) req)) (/.f64 (*.f64 #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))))) (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i))) (-.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e))))))
(if.f64 (<=.f64 sgn #s(literal -3022314549036573/151115727451828646838272 binary64)) (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req a) J2)) (*.f64 (/.f64 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)) e)))) a) (*.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 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) sgn) (*.f64 #s(literal 1/2 binary64) J2))) (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)))))
(if.f64 (<=.f64 a #s(literal 3691642954246359/5954262829429611647380060634218533145425030026750509549825967711687797048224955787888157087447151129073766576998532529631515456541611261952 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) #s(literal 1/8 binary64)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.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 (*.f64 #s(literal 5 binary64) (cos.f64 i)) (cos.f64 i)))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (*.f64 (*.f64 (*.f64 (/.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 #s(literal 8 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 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 (*.f64 #s(literal 5 binary64) (cos.f64 i)) (cos.f64 i)))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))))
(if.f64 (<=.f64 a #s(literal 3691642954246359/5954262829429611647380060634218533145425030026750509549825967711687797048224955787888157087447151129073766576998532529631515456541611261952 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) #s(literal 1/8 binary64)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.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 (*.f64 #s(literal 5 binary64) (cos.f64 i)) (cos.f64 i)))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (*.f64 #s(literal 8 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 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)))))
(if.f64 (<=.f64 a #s(literal 3691642954246359/5954262829429611647380060634218533145425030026750509549825967711687797048224955787888157087447151129073766576998532529631515456541611261952 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) #s(literal 1/8 binary64)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.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 (*.f64 #s(literal 5 binary64) (cos.f64 i)) (cos.f64 i)))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 #s(literal 1/8 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)))) (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)))))
(if.f64 (<=.f64 a #s(literal 3691642954246359/5954262829429611647380060634218533145425030026750509549825967711687797048224955787888157087447151129073766576998532529631515456541611261952 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) #s(literal 1/8 binary64)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.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 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 #s(literal 1/8 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)))) (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)))))
(if.f64 (<=.f64 req #s(literal 50000000000000 binary64)) (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req a) J2)) (/.f64 sgn (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) e) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (cos.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 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (*.f64 #s(literal 11/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) req) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req a) J2)) (/.f64 sgn (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (cos.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 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (*.f64 #s(literal 11/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -1 binary64))) a))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 #s(literal 1/8 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)))) (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 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) (*.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (-.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 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (/.f64 req (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))))))
(*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req a) J2)) (/.f64 sgn (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) e) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (cos.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 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (*.f64 #s(literal 11/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
(*.f64 (*.f64 (*.f64 (/.f64 sgn (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) req) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req a) J2))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) a) (*.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 #s(literal 11/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -1 binary64)) (cos.f64 (+.f64 omega omega)))))
(*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (/.f64 req (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a))))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) #s(literal 1/8 binary64)) (cos.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 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (*.f64 #s(literal 11/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal 99999999999999992462348437353960485060448933957923525202610654848990348279466077292501969423268405025328970231162545648343655275306678872441733790178059478330735395060467469727994972900530063978805843953102113868000379620369084502134308975505229555772913629423636305841602377586326247764393984 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 a) (/.f64 req a)) sgn) (*.f64 J2 #s(literal 1/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 (/.f64 req a) (/.f64 req a)) sgn) (*.f64 J2 #s(literal 1/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 (/.f64 req a) (/.f64 req a)) sgn) (*.f64 J2 #s(literal 1/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)))))))))
(+.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 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))))) (-.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 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 (/.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/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 a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #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 req (*.f64 (/.f64 req (*.f64 a a)) sgn)) #s(literal 1/2 binary64)) J2) (*.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 (sin.f64 (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #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 (/.f64 req (*.f64 a a)) sgn)) #s(literal 1/2 binary64)) J2)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (*.f64 (/.f64 req (*.f64 a a)) sgn)) #s(literal 1/2 binary64)) J2) (*.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))))) (sin.f64 (+.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)) (*.f64 (PI.f64) #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 0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) (*.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/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 (*.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 req (*.f64 a a)) (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))))) (*.f64 (neg.f64 (/.f64 (*.f64 (/.f64 req (*.f64 a a)) (*.f64 req (*.f64 #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))))) (*.f64 (*.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 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 f f) (+.f64 omega 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 (*.f64 req req) (*.f64 a 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/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 req a) (*.f64 (*.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) (/.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 req) (*.f64 a a)) (*.f64 #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 req (*.f64 (/.f64 req (*.f64 a a)) sgn)) #s(literal 1/2 binary64)) J2) (*.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 (sin.f64 (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #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 (/.f64 req (*.f64 a a)) sgn)) #s(literal 1/2 binary64)) J2)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (*.f64 (/.f64 req (*.f64 a a)) sgn)) #s(literal 1/2 binary64)) J2) (*.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))))) (sin.f64 (+.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal 4946608029462091/989321605892418136242010084078588760140525396404847359656252224371588900426127468681265604244972179958390685704064557357405460137227004839870184620407572671666427088594796544 binary64)) (-.f64 (*.f64 (-.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 (cos.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (/.f64 (*.f64 (/.f64 req (*.f64 a a)) (*.f64 req (*.f64 #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))))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.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 req (*.f64 a a)) (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))))) (*.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (*.f64 (/.f64 req (*.f64 a a)) (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (/.f64 (*.f64 (*.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 #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 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.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)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 a 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/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 req a) (*.f64 (*.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) (/.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 req) (*.f64 a a)) (*.f64 #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 4946608029462091/989321605892418136242010084078588760140525396404847359656252224371588900426127468681265604244972179958390685704064557357405460137227004839870184620407572671666427088594796544 binary64)) (-.f64 (*.f64 (-.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 (cos.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (/.f64 (*.f64 (/.f64 req (*.f64 a a)) (*.f64 req (*.f64 #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))))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.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 req (*.f64 a a)) (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))))) (*.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (*.f64 (/.f64 req (*.f64 a a)) (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (/.f64 (*.f64 (*.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 #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 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.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)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (/.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)))))) #s(literal 1/8 binary64)) e) (*.f64 (-.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 #s(literal 1/2 binary64) J2) sgn) (/.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 (*.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (+.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 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 req a) (*.f64 (*.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) (/.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 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))))
(if.f64 (<=.f64 i #s(literal 6436481271636733/3064991081731777716716694054300618367237478244367204352 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (/.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)))))) #s(literal 1/8 binary64)) e) (*.f64 (-.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 #s(literal 1/2 binary64) J2) sgn) (/.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 (*.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (+.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 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 req a) (*.f64 (*.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) (/.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 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))))) #s(literal 1/8 binary64)) e) (*.f64 (-.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 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))))) (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (+.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 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) sgn) (*.f64 #s(literal 1/2 binary64) J2)) (+.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 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))))
(if.f64 (<=.f64 i #s(literal 6436481271636733/3064991081731777716716694054300618367237478244367204352 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) (/.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)))))) #s(literal 1/8 binary64)) e) (*.f64 (-.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 #s(literal 1/2 binary64) J2) sgn) (/.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 (*.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (+.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 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))))) (*.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) (/.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 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))))) #s(literal 1/8 binary64)) e) (*.f64 (-.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 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))))) (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (+.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 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) sgn) (*.f64 #s(literal 1/2 binary64) J2)) (+.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 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))))
(if.f64 (<=.f64 i #s(literal 6436481271636733/3064991081731777716716694054300618367237478244367204352 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))))))) #s(literal 1/8 binary64)) e) (*.f64 (-.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 #s(literal 1/2 binary64) J2) (*.f64 sgn (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))))))) (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (+.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 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 req a) (*.f64 (*.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) (/.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 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))))) #s(literal 1/8 binary64)) e) (*.f64 (-.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 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))))) (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (+.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 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) sgn) (*.f64 #s(literal 1/2 binary64) J2)) (+.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 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))))) #s(literal 1/8 binary64)) e) (*.f64 (-.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 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 req (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))))) (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (+.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 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) sgn) (*.f64 #s(literal 1/2 binary64) J2)) (+.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 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 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal 9999999999999999529098585253973751145501342374646995204443699533752222309208135100774737254399069875964494058799026896824009283758441475916906799486389390443691279468658234350904109878520700943148057046794110173854458342872794765056233999682236635579342942941443126198272 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.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))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (/.f64 (/.f64 req a) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) (*.f64 sgn (/.f64 J2 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (-.f64 (-.f64 (-.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 (+.f64 f omega) omega))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 #s(literal 1/8 binary64) (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (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 #s(literal 2 binary64) (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) #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 #s(literal 2 binary64) (+.f64 i (*.f64 (PI.f64) #s(literal 1/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 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 1/2 binary64))))))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) 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 (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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal 9999999999999999529098585253973751145501342374646995204443699533752222309208135100774737254399069875964494058799026896824009283758441475916906799486389390443691279468658234350904109878520700943148057046794110173854458342872794765056233999682236635579342942941443126198272 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.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))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (/.f64 (/.f64 req a) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) (*.f64 sgn (/.f64 J2 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (-.f64 (-.f64 (-.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 (+.f64 f omega) omega))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (/.f64 req a) sgn) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) sgn) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2)) (*.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 (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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal 9999999999999999529098585253973751145501342374646995204443699533752222309208135100774737254399069875964494058799026896824009283758441475916906799486389390443691279468658234350904109878520700943148057046794110173854458342872794765056233999682236635579342942941443126198272 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.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))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (/.f64 req a) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (-.f64 (-.f64 (-.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 (+.f64 f omega) omega))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (/.f64 req a) sgn) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) sgn) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2)) (*.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 (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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal -2043740476963553/20437404769635530871361256581497226916530700906859085224986083762557049772738192033637969566644589579154866655684531151298277765001150399085969119214436673744076858091019117327539586267590276988750370373064129781691707499060437712782221877948907972172872918086407741866417750991158722661661540352 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.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))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) #s(literal -11 binary64)) (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) (/.f64 #s(literal -40 binary64) (-.f64 (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.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/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 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) sgn)) #s(literal 1/8 binary64)) (*.f64 (*.f64 (cos.f64 i) e) e)) (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))))) (sin.f64 (+.f64 omega omega))) (*.f64 (/.f64 req a) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (-.f64 (-.f64 (-.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 (+.f64 f omega) omega))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.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 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal 9999999999999999529098585253973751145501342374646995204443699533752222309208135100774737254399069875964494058799026896824009283758441475916906799486389390443691279468658234350904109878520700943148057046794110173854458342872794765056233999682236635579342942941443126198272 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.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))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) #s(literal -11 binary64)) (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) (/.f64 #s(literal -40 binary64) (-.f64 (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.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/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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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)) #s(literal 1/2 binary64)) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 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 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) 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 (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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal 9999999999999999529098585253973751145501342374646995204443699533752222309208135100774737254399069875964494058799026896824009283758441475916906799486389390443691279468658234350904109878520700943148057046794110173854458342872794765056233999682236635579342942941443126198272 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 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 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) 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 (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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (/.f64 req a) sgn) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) sgn) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2)) (*.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 (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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal 9999999999999999529098585253973751145501342374646995204443699533752222309208135100774737254399069875964494058799026896824009283758441475916906799486389390443691279468658234350904109878520700943148057046794110173854458342872794765056233999682236635579342942941443126198272 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 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 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) 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 (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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 #s(literal 1/8 binary64) (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 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 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) 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 (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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal 9999999999999999529098585253973751145501342374646995204443699533752222309208135100774737254399069875964494058799026896824009283758441475916906799486389390443691279468658234350904109878520700943148057046794110173854458342872794765056233999682236635579342942941443126198272 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.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))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) #s(literal -11 binary64)) (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) (/.f64 #s(literal -40 binary64) (-.f64 (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.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/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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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)) #s(literal 1/2 binary64)) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 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 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) 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 (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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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)) #s(literal 1/2 binary64)) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 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 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) 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 (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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (/.f64 req (*.f64 a a))) (*.f64 req sgn)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (/.f64 req (*.f64 a a))) (*.f64 req 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 (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 (/.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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.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/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 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (cos.f64 i) e) e))) (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))))))) (*.f64 (-.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (-.f64 (-.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 (+.f64 f omega) omega))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))))))
(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 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))))) (*.f64 (cos.f64 i) e)) (*.f64 e (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.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 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) #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 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.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 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (cos.f64 i) e) e))) (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))))))) (*.f64 (-.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (-.f64 (-.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 (+.f64 f omega) omega))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))))))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (cos.f64 i) e) e))) (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 #s(literal 40 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)))))))) (*.f64 (-.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (-.f64 (-.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 (+.f64 f omega) omega))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 sgn (/.f64 req (*.f64 a a))) req)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i)))))
(-.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 (*.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/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn))))
(if.f64 (<=.f64 (pow.f64 (cos.f64 i) #s(literal 2 binary64)) #s(literal 8962163258467287/9007199254740992 binary64)) (+.f64 a (*.f64 (*.f64 a (/.f64 req a)) (*.f64 (-.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))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)))) (+.f64 a (*.f64 (*.f64 a (/.f64 req a)) (*.f64 (-.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/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)))))
(+.f64 a (*.f64 (*.f64 a (/.f64 req a)) (*.f64 (-.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/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn))))
(if.f64 (<=.f64 sgn #s(literal -213598703592091/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (+.f64 a (*.f64 (*.f64 (*.f64 (/.f64 req a) a) (*.f64 (-.f64 (*.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 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (-.f64 (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #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)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2))) sgn)) (+.f64 a (*.f64 (*.f64 a (/.f64 req a)) (*.f64 (-.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))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 (*.f64 (/.f64 req a) sgn) (*.f64 #s(literal 1/2 binary64) J2))))))
(if.f64 (<=.f64 sgn #s(literal -213598703592091/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (+.f64 a (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) a) (-.f64 (*.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 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (-.f64 (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #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))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2)) sgn)) (+.f64 a (*.f64 (*.f64 a (/.f64 req a)) (*.f64 (-.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))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 (*.f64 (/.f64 req a) sgn) (*.f64 #s(literal 1/2 binary64) J2))))))
(+.f64 a (*.f64 (*.f64 a (/.f64 req a)) (*.f64 (-.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))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 (*.f64 (/.f64 req a) sgn) (*.f64 #s(literal 1/2 binary64) J2)))))
(+.f64 a (*.f64 (*.f64 a (/.f64 req a)) (*.f64 (-.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))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn))))
(if.f64 (<=.f64 (+.f64 a (*.f64 a (*.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 (pow.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))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (*.f64 (pow.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))) #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 a (*.f64 a (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (-.f64 (*.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.f64 (/.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.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 #s(literal -3 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 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 a (*.f64 a (*.f64 sgn (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) req) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 omega f))) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #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 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))))) req)) a) a)))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 (*.f64 (-.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))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 #s(literal 1/2 binary64) J2)) (/.f64 req a)) (/.f64 req a)))))
(if.f64 (<=.f64 omega #s(literal -6032057205060441/6032057205060440848842124543157735677050252251748505781796615064961622344493727293370973578138265743708225425014400837164813540499979063179105919597766951022193355091707896034850684039059079180396788349106095584290087446076413771468940477241550670753145517602931224392424029547429993824129889235158145614364972941312 binary64)) (+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 (-.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))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 req req)) a) a))))) (+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 (*.f64 (-.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))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 #s(literal 1/2 binary64) J2)) req) (/.f64 req (*.f64 a a)))))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 omega f))) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #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 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))))) req) (*.f64 (/.f64 req (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) J2))))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 (*.f64 (-.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))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i)))) (-.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 #s(literal 1/2 binary64) J2)) req) (/.f64 req (*.f64 a a))))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (-.f64 (*.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 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (-.f64 (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #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)))) req) req) (*.f64 a a))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 7580654747562055/379032737378102767370356320425415662904513187772631008578870126471203845870697482014374611530431269030880793627229265919475483409207718357286202948008100864063587640630090308972232735749901964068667724412528434753635948938919936 binary64)) (+.f64 (+.f64 (+.f64 M omega) Omega) (+.f64 (-.f64 (*.f64 (/.f64 (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 (/.f64 req a) (/.f64 req 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 a) (/.f64 req 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 (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 (/.f64 req a) (/.f64 req 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 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 (/.f64 req a) (/.f64 req 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 a) (/.f64 req 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 M omega) Omega) (+.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)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/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 (cos.f64 (+.f64 i i)) #s(literal -1/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 16 binary64)) (*.f64 (+.f64 (+.f64 (+.f64 #s(literal 2 binary64) (*.f64 e e)) (neg.f64 (*.f64 (*.f64 #s(literal 11 binary64) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 e e)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))))) (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 40 binary64) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (*.f64 e e)))) (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 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (*.f64 #s(literal 400 binary64) (*.f64 e e)) (pow.f64 (cos.f64 i) #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.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 4 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 6 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))))) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (*.f64 (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (sin.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (cos.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))) (*.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 (/.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)) (*.f64 (*.f64 (*.f64 e e) (*.f64 (cos.f64 i) (+.f64 (+.f64 #s(literal 11 binary64) (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/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) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/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) (*.f64 e e))) #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) (+.f64 (*.f64 (sin.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (cos.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))))) (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 M omega) Omega) (+.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)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/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 (cos.f64 (+.f64 i i)) #s(literal -1/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 16 binary64)) (*.f64 (+.f64 (+.f64 (+.f64 #s(literal 2 binary64) (*.f64 e e)) (neg.f64 (*.f64 (*.f64 #s(literal 11 binary64) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 e e)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))))) (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 40 binary64) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (*.f64 e e)))) (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 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (*.f64 #s(literal 400 binary64) (*.f64 e e)) (pow.f64 (cos.f64 i) #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.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 4 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 6 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))))) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (*.f64 (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (sin.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (cos.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))) (*.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 (/.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)) (*.f64 (*.f64 (*.f64 e e) (*.f64 (cos.f64 i) (+.f64 (+.f64 #s(literal 11 binary64) (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/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) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/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) (*.f64 e e))) #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) (+.f64 (*.f64 (sin.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (cos.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))))) (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 9999999999999999287738405203667575368767393208115766122317814807014700953545274940077463414411382764424743897695475635254322931165011225671787143593812227771048544607458046793796444970432082673836316471673778619485458899748089618699435710767754281089234894848 binary64)) (-.f64 (+.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e 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 #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 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) (*.f64 e e)) (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 #s(literal 2 binary64) i)))))) #s(literal 2 binary64))) (-.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 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 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 #s(literal 1/16 binary64) (/.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 (-.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)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (+.f64 (*.f64 (sin.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (cos.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))))))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.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))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (+.f64 (/.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 #s(literal 2 binary64) i)))))) #s(literal 2 binary64))) (-.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 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))))))) #s(literal -11 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.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 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (+.f64 (*.f64 (sin.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (cos.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))))) (-.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 #s(literal 2 binary64) i)))))))) (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 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 (-.f64 (*.f64 (*.f64 (*.f64 (-.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 (/.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))))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 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)))) (-.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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e) (pow.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 5 binary64))) #s(literal 2 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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))) (-.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 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))))) (*.f64 #s(literal 1/16 binary64) (*.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)))))))) (sin.f64 (+.f64 omega omega))) (+.f64 (+.f64 omega M) Omega)) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (*.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)))))) (-.f64 (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 #s(literal 1/8 binary64) (*.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)))))))) (+.f64 (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.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 5 binary64))) #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 80 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)))) #s(literal -11 binary64))))) (*.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 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.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))))))) (-.f64 #s(literal 3 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))) (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 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))))))))
(-.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (-.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 (/.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))))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 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)))) (-.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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e) (pow.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 5 binary64))) #s(literal 2 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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))) (-.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 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))))) (*.f64 #s(literal 1/16 binary64) (*.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)))))))) (sin.f64 (+.f64 omega omega))) (+.f64 (+.f64 omega M) Omega)) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (*.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)))))) (-.f64 (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 #s(literal 1/8 binary64) (*.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)))))))) (+.f64 (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.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 5 binary64))) #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 80 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)))) #s(literal -11 binary64))))) (*.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 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.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))))))) (-.f64 #s(literal 3 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))) (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 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)))))))
(if.f64 (<=.f64 a #s(literal -2557336412418861/12786682062094304179739022253232809188346257992355721833919106906625522642205759980012773798148063113870651109873281527379754908382364816614564560896 binary64)) (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (-.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 #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)))) (*.f64 req (/.f64 req (*.f64 a a)))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 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)))) (-.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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e) (pow.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 5 binary64))) #s(literal 2 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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))) (-.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 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 #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)))) (*.f64 req (/.f64 req (*.f64 a a))))))) (sin.f64 (+.f64 omega omega))) (+.f64 (+.f64 omega M) Omega)) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (*.f64 (/.f64 (*.f64 #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)))) (*.f64 req (/.f64 req (*.f64 a a))))) (-.f64 (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 #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)))) (*.f64 req (/.f64 req (*.f64 a a))))))) (+.f64 (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.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 5 binary64))) #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 80 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)))) #s(literal -11 binary64))))) (*.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 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 #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)))) (*.f64 req (/.f64 req (*.f64 a a)))))) (-.f64 #s(literal 3 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))) (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 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))))))) (if.f64 (<=.f64 a #s(literal 439347050248359/219673525124179510879420825570604582952621929604585773100622830693937381868724993667921908501166545759273481964527387457187903615990932602002368905315681828864 binary64)) (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 req req) a) a) (/.f64 (*.f64 #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))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.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 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 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 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 req req) a) a) (/.f64 (*.f64 #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 1/16 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e) (pow.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 5 binary64))) #s(literal 2 binary64))) (-.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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) (-.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)))))))))) (sin.f64 (+.f64 omega omega))) (+.f64 Omega (+.f64 omega M))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 req req) a) a) (/.f64 (*.f64 #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 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (-.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 5 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 req req) a) a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 req req) a) a) (/.f64 (*.f64 #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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 (cos.f64 i) e) e)) (+.f64 (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.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 5 binary64))) #s(literal 2 binary64))) (-.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) #s(literal -11 binary64))))))) (-.f64 (+.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e 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 #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 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) (*.f64 e e)) (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 #s(literal 2 binary64) i)))))) #s(literal 2 binary64))) (-.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 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 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 #s(literal 1/16 binary64) (/.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 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 (cos.f64 i) e) e)) (+.f64 (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.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 5 binary64))) #s(literal 2 binary64))) (-.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) #s(literal -11 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M)) (-.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 5 binary64))))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 1000000000000000013946113804119924437974165856986638331112094170909680489426130543638408513078605724209795153399497011464465488473637220910340574757582946907032347746826714825234078949864321840610832155574248213693581484614981956096327942144 binary64)) (-.f64 (+.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e 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 #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 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) (*.f64 e e)) (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 #s(literal 2 binary64) i)))))) #s(literal 2 binary64))) (-.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 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 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 #s(literal 1/16 binary64) (/.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 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 (cos.f64 i) e) e)) (+.f64 (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.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 5 binary64))) #s(literal 2 binary64))) (-.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) #s(literal -11 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M)) (-.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 5 binary64)))))) (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.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))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.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 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 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 (*.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 1/16 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e) (pow.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 5 binary64))) #s(literal 2 binary64))) (-.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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) (-.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)))))))))) (sin.f64 (+.f64 omega omega))) (+.f64 Omega (+.f64 omega M))) (*.f64 (*.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 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (-.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 5 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 (cos.f64 i) e) e)) (+.f64 (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.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 5 binary64))) #s(literal 2 binary64))) (-.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) #s(literal -11 binary64))))))))
(if.f64 (<=.f64 (+.f64 (+.f64 (+.f64 M omega) Omega) (+.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)) (*.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 (*.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 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 (/.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 (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 (/.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 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e 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 #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 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) (*.f64 e e)) (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 #s(literal 2 binary64) i)))))) #s(literal 2 binary64))) (-.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 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 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 #s(literal 1/16 binary64) (/.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 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 (cos.f64 i) e) e)) (+.f64 (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.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 5 binary64))) #s(literal 2 binary64))) (-.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) #s(literal -11 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M)) (-.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 5 binary64)))))) (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (-.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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e) (pow.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 5 binary64))) #s(literal 2 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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))) (-.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 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.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 omega M) Omega)) (*.f64 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) 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) (cos.f64 i))) (-.f64 (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) e) e)) (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/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 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal -3 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))))))))
(if.f64 (<=.f64 (+.f64 (+.f64 (+.f64 M omega) Omega) (+.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)) (*.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 (*.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 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 (/.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 (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 (/.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/8 binary64) (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.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 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 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 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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 1/16 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e) (pow.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 5 binary64))) #s(literal 2 binary64))) (-.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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) (-.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)))))))))) (sin.f64 (+.f64 omega omega))) (+.f64 Omega (+.f64 omega M))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (-.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 5 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (/.f64 (*.f64 #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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 (cos.f64 i) e) e)) (+.f64 (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.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 5 binary64))) #s(literal 2 binary64))) (-.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 5 binary64)))) #s(literal -11 binary64))))))) (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (-.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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e) (pow.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 5 binary64))) #s(literal 2 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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))) (-.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 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.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 omega M) Omega)) (*.f64 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) 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) (cos.f64 i))) (-.f64 (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) e) e)) (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/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 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal -3 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))))))))
(-.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (-.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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e) (pow.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 5 binary64))) #s(literal 2 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 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))) (-.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 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))))))) (sin.f64 (+.f64 omega omega))) (+.f64 (+.f64 omega M) Omega)) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (-.f64 (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64)) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))))))) (+.f64 (/.f64 (*.f64 #s(literal 200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.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 5 binary64))) #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 80 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)))) #s(literal -11 binary64))))) (*.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 (sin.f64 (+.f64 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 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 3 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 5 binary64)))) (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 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)))))))
(pow.f64 #s(literal 10 binary64) (-.f64 #s(literal -503/40 binary64) (-.f64 (-.f64 (*.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 #s(literal -23024/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64)))) (-.f64 (*.f64 (pow.f64 (-.f64 (*.f64 alt #s(literal 10000/2928563 binary64)) #s(literal 5268000/2928563 binary64)) #s(literal 5 binary64)) #s(literal -5889/10000 binary64)) (-.f64 (*.f64 (pow.f64 (-.f64 (*.f64 alt #s(literal 10000/2928563 binary64)) #s(literal 5268000/2928563 binary64)) #s(literal 4 binary64)) #s(literal 5269/10000 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 100000000/8576481244969 binary64) (-.f64 alt #s(literal 2634/5 binary64))) (-.f64 alt #s(literal 2634/5 binary64))) (+.f64 #s(literal 60713/100000 binary64) (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) #s(literal -10036/2928563 binary64)))))))))
(pow.f64 #s(literal 10 binary64) (-.f64 #s(literal -503/40 binary64) (-.f64 (-.f64 (*.f64 #s(literal 23024/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) (*.f64 (pow.f64 (-.f64 (*.f64 alt #s(literal 10000/2928563 binary64)) #s(literal 5268000/2928563 binary64)) #s(literal 6 binary64)) #s(literal 34047/100000 binary64))) (-.f64 (*.f64 (pow.f64 (-.f64 (*.f64 alt #s(literal 10000/2928563 binary64)) #s(literal 5268000/2928563 binary64)) #s(literal 5 binary64)) #s(literal -5889/10000 binary64)) (-.f64 (*.f64 (pow.f64 (-.f64 (*.f64 alt #s(literal 10000/2928563 binary64)) #s(literal 5268000/2928563 binary64)) #s(literal 4 binary64)) #s(literal 5269/10000 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 100000000/8576481244969 binary64) (-.f64 alt #s(literal 2634/5 binary64))) (-.f64 alt #s(literal 2634/5 binary64))) (+.f64 #s(literal 60713/100000 binary64) (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) #s(literal -10036/2928563 binary64)))))))))
(pow.f64 #s(literal 10 binary64) (-.f64 #s(literal -503/40 binary64) (-.f64 (-.f64 (*.f64 #s(literal 23024/2928563 binary64) (-.f64 alt #s(literal 2634/5 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 (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 (*.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 #s(literal 100000000/8576481244969 binary64) (-.f64 alt #s(literal 2634/5 binary64))) (-.f64 alt #s(literal 2634/5 binary64))) (+.f64 #s(literal 60713/100000 binary64) (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) #s(literal -10036/2928563 binary64)))))))))
(pow.f64 #s(literal 10 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 (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 #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 (*.f64 (*.f64 #s(literal 100000000/8576481244969 binary64) (-.f64 alt #s(literal 2634/5 binary64))) (-.f64 alt #s(literal 2634/5 binary64))) (+.f64 (*.f64 #s(literal -10036/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal -60713/100000 binary64)))) (-.f64 (*.f64 #s(literal 23024/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal -503/40 binary64)))))
(*.f64 (sqrt.f64 (fabs.f64 p)) (sqrt.f64 (fabs.f64 mu)))
(sqrt.f64 (*.f64 mu p))
(/.f64 (-.f64 (+.f64 (-.f64 (-.f64 N (*.f64 (*.f64 (cosh.f64 N) e) N)) N) (*.f64 (sinh.f64 N) e)) N) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)))
(/.f64 (-.f64 (+.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)) N) N) (*.f64 (sinh.f64 N) e)) N) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)))
(-.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 (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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) e))))) #s(literal 2 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)))