(if.f64 (<=.f64 mu #s(literal 8424983333484575/1684996666696914987166688442938726917102321526408785780068975640576 binary64)) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) mu) (/.f64 (sin.f64 i) h)) (*.f64 (/.f64 (*.f64 (sin.f64 i) mu) h) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))))
(if.f64 (<=.f64 h #s(literal 3602879701896397/144115188075855872 binary64)) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) mu) (/.f64 (sin.f64 i) h)) (*.f64 (*.f64 (sin.f64 i) mu) (/.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) h)))
(if.f64 (<=.f64 (/.f64 mu h) #s(literal 6237000967295999/311850048364799970571308236412006025948039259443040240859773006630814358104525635278899682108224328295209757319405077381870693435686499009490495593482004909425000886398607136955865268975681716747289586991334988123957939133612635998263883635695006899610487641699336881506618514879741251551232 binary64)) (*.f64 (*.f64 (sin.f64 i) mu) (/.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) h)) (if.f64 (<=.f64 (/.f64 mu h) #s(literal 19999999999999999637261396616218963965854548433967571443553349589398276213078849877797201319406193650987089233045392713610056728883285684658627493100394288507721587321969841645914622571464951723145900071059456 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))
(if.f64 (<=.f64 mu #s(literal 7410693711188237/14821387422376473014217086081112052205218558037201992197050570753012880593911808 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 i)) (neg.f64 mu)) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 AN))) (*.f64 (*.f64 (sin.f64 AN) mu) (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)))) h) (*.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)))
(if.f64 (<=.f64 h #s(literal 4542742026847543/22713710134237715329666368996500141698551292521478689383796568724394977753543685103943470334805111423773828800195818060422956300894208 binary64)) (*.f64 (/.f64 mu h) (-.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (*.f64 (cos.f64 i) (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)))
(if.f64 (<=.f64 h #s(literal 4542742026847543/22713710134237715329666368996500141698551292521478689383796568724394977753543685103943470334805111423773828800195818060422956300894208 binary64)) (*.f64 (/.f64 mu h) (-.f64 (*.f64 (cos.f64 i) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN)))) (*.f64 mu (/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 AN)) (cos.f64 i)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h)))
(*.f64 mu (/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 AN)) (cos.f64 i)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h))
(if.f64 (<=.f64 h #s(literal 7762590461503545/1552518092300708935148979488462502555256886017116696611139052038026050952686376886330878408828646477950487730697131073206171580044114814391444287275041181139204454976020849905550265285631598444825262999193716468750892846853816057856 binary64)) (/.f64 (*.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))) mu) (neg.f64 h)) (/.f64 mu (/.f64 (neg.f64 h) (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (*.f64 (cos.f64 i) (sin.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))))))
(if.f64 (<=.f64 h #s(literal 5265614583427859/105312291668557186697918027683670432318895095400549111254310977536 binary64)) (*.f64 (neg.f64 (/.f64 mu h)) (+.f64 (*.f64 (cos.f64 AN) (+.f64 (sin.f64 theta) (*.f64 e (sin.f64 AP)))) (*.f64 (*.f64 (sin.f64 AN) (+.f64 (cos.f64 theta) (*.f64 e (cos.f64 AP)))) (cos.f64 i)))) (*.f64 (neg.f64 mu) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (*.f64 (sin.f64 AN) (cos.f64 i))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) h)))
(if.f64 (<=.f64 h #s(literal 1156847945382935/330527984395124299475957654016385519914202341482140609642324397637202895618155672912594605219857642423795606012511679152128 binary64)) (*.f64 (neg.f64 (/.f64 mu h)) (+.f64 (*.f64 (cos.f64 AN) (+.f64 (sin.f64 theta) (*.f64 e (sin.f64 AP)))) (*.f64 (*.f64 (cos.f64 i) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))) (sin.f64 AN)))) (*.f64 (neg.f64 mu) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (*.f64 (sin.f64 AN) (cos.f64 i))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) h)))
(*.f64 (neg.f64 mu) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (*.f64 (sin.f64 AN) (cos.f64 i))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) h))
(*.f64 (neg.f64 mu) (/.f64 (+.f64 (*.f64 (cos.f64 i) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (sin.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) h))
(*.f64 (-.f64 e #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal -1 binary64) e) a))
(*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e)))
(*.f64 (*.f64 (sin.f64 theta) r) (sin.f64 i))
(*.f64 (*.f64 (sin.f64 i) r) (sin.f64 theta))
(*.f64 r (*.f64 (sin.f64 theta) (sin.f64 i)))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) r) (sin.f64 AN)) (*.f64 (neg.f64 r) (*.f64 (cos.f64 i) (*.f64 (sin.f64 theta) (cos.f64 AN)))))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) r) (sin.f64 AN)) (*.f64 (*.f64 (cos.f64 i) (sin.f64 theta)) (*.f64 (cos.f64 AN) r)))
(*.f64 r (+.f64 (*.f64 (sin.f64 AN) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 AN) (sin.f64 theta)) (cos.f64 i))))
(-.f64 (*.f64 (*.f64 r (cos.f64 theta)) (cos.f64 AN)) (*.f64 (*.f64 (cos.f64 i) (*.f64 (sin.f64 theta) (sin.f64 AN))) r))
(*.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 (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 (atan2.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) f)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) e))))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) f)) (sqrt.f64 (-.f64 e #s(literal -1 binary64))))) #s(literal 2 binary64))
(*.f64 (atan2.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) f)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) e)))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) f)) (sqrt.f64 (-.f64 e #s(literal -1 binary64))))) #s(literal 2 binary64))
(*.f64 (atan2.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) f)) (sqrt.f64 (-.f64 #s(literal 1 binary64) e))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) f)) (sqrt.f64 (-.f64 e #s(literal -1 binary64))))) #s(literal 2 binary64))
(if.f64 (<=.f64 density #s(literal 3466232109999065/4951760157141521099596496896 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1000 binary64) v) Cd) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) density) A) v) m)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (*.f64 (/.f64 v m) A) Cd)) 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 (*.f64 #s(literal -500 binary64) (*.f64 (/.f64 v m) (*.f64 Cd density))) (*.f64 v A)) (if.f64 (<=.f64 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -4968057895362269/49680578953622685924767343630800081768220352547734291556449665216833630485964060362588109082516687294415607382308194342597490561411674060526217192801317796454542559232667196977608489140211150234408415974198927000028571099322113851392 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 #s(literal -500 binary64) (*.f64 (/.f64 v m) density)) (*.f64 v Cd)) A)))
(if.f64 (<=.f64 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -inf.0 binary64)) (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (/.f64 v m) (*.f64 Cd density))) (*.f64 v A)) (if.f64 (<=.f64 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -4968057895362269/49680578953622685924767343630800081768220352547734291556449665216833630485964060362588109082516687294415607382308194342597490561411674060526217192801317796454542559232667196977608489140211150234408415974198927000028571099322113851392 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 #s(literal -500 binary64) (*.f64 (/.f64 v m) density)) (*.f64 v Cd)) A)))
(if.f64 (<=.f64 (/.f64 (*.f64 Cd A) m) #s(literal 5339967589802275/1067993517960455041197510853084776057301352261178326384973520803911109862890320275011481043468288 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (/.f64 v m) density)) (*.f64 v Cd)) A) (if.f64 (<=.f64 (/.f64 (*.f64 Cd A) m) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (*.f64 (/.f64 Cd m) A) density)) v) v) (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (/.f64 v m) (*.f64 Cd density))) (*.f64 v A))))
(if.f64 (<=.f64 (/.f64 (*.f64 Cd A) m) #s(literal 5339967589802275/1067993517960455041197510853084776057301352261178326384973520803911109862890320275011481043468288 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (*.f64 (/.f64 v m) A) Cd)) v) density) (if.f64 (<=.f64 (/.f64 (*.f64 Cd A) m) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (*.f64 (/.f64 Cd m) A) density)) v) v) (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (/.f64 v m) (*.f64 Cd density))) (*.f64 v A))))
(if.f64 (<=.f64 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -inf.0 binary64)) (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (/.f64 v m) (*.f64 Cd density))) (*.f64 v A)) (if.f64 (<=.f64 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -7260824748426675/18152061871066687778296661354368903321914797383537530017770652579540291225102592450502542901564408576535628952517004065557306948798155587253306037366972590646764780767180906664339433713797579795779287057890032192456881698082005372169886461674177955114893128728688280185836979355648 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (*.f64 (/.f64 Cd m) A) density)) v) v) (*.f64 (*.f64 v (/.f64 v m)) (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 A Cd)) density))))
(if.f64 (<=.f64 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -499999999999999966930247417371487281185975108215165759305846411153850323349801823812846216297922973585457277299849260737769690406722406396639729252701864308747192500224 binary64)) (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (/.f64 v m) (*.f64 Cd density))) (*.f64 v A)) (*.f64 (*.f64 v (/.f64 v m)) (*.f64 (*.f64 #s(literal -500 binary64) (*.f64 A Cd)) density)))
(*.f64 (*.f64 #s(literal -500 binary64) (*.f64 (/.f64 v m) (*.f64 Cd density))) (*.f64 v A))
(-.f64 (*.f64 (-.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))) (cos.f64 Omega)) (*.f64 (*.f64 (sin.f64 (*.f64 i #s(literal 1/2 binary64))) dOmega) (sin.f64 Omega)))
(-.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 50000000000000004641673518601159954844517422622525385549225694063461714040984789960014820604544131271471563404911386848873613068925538235484773792943686604067961981752493137735453512646120016981018974140087018752579040234700800 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 #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 (pow.f64 (sin.f64 i) #s(literal 2 binary64)) (*.f64 #s(literal 3 binary64) (+.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 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (/.f64 req a)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) #s(literal 1/8 binary64)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.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 (*.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 req a))) (*.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 #s(literal 1 binary64) (*.f64 e e)) e) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (/.f64 req a)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) #s(literal 1/8 binary64)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.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 (*.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 req a))) (*.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 199999999999999987850710501107292437200805744402346499063815431426464091260264678056866185148810154968737122361123243451574343874852720610604715976817337655499746028833640220821354205063248818116874396050971031981532793651016436653190982245392158996106920698373251448128152087616919197241498086962762874880 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 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 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 (*.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 req a)))) (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 (*.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 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (-.f64 (*.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 #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))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 3 binary64) (-.f64 (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) 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 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal -1 binary64))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) (+.f64 omega omega))) (-.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 #s(literal 1 binary64) (*.f64 e e)))) #s(literal -1/3 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 (*.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 req a)))) (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 (*.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 req a))) (*.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) #s(literal 3/2 binary64)) #s(literal 1 binary64)))))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.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 req a)))) (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 (*.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 req a))) (*.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 199999999999999987850710501107292437200805744402346499063815431426464091260264678056866185148810154968737122361123243451574343874852720610604715976817337655499746028833640220821354205063248818116874396050971031981532793651016436653190982245392158996106920698373251448128152087616919197241498086962762874880 binary64)) (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #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))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (-.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 #s(literal 1/4 binary64) (*.f64 (*.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))) #s(literal 1/2 binary64)) (*.f64 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (-.f64 (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) 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 (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 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))))
(-.f64 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -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 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64))) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) req) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) a)) #s(literal 1/8 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.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 req a))) (*.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 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #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))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (-.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 #s(literal 1/4 binary64) (*.f64 (*.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))) #s(literal 1/2 binary64)) (*.f64 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (-.f64 (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) 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 (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 (*.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #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)))))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (-.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 (-.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 #s(literal 1/4 binary64) (*.f64 (*.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)))))) #s(literal 1/2 binary64)) (*.f64 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (-.f64 (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) 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 (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)))))))
(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 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #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)))))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (-.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 binary64) (-.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 binary64) (-.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 #s(literal 1/4 binary64) (*.f64 (*.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)))))) #s(literal 1/2 binary64)) (*.f64 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (-.f64 (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) 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 (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 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)))))) (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #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)))))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (-.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 (-.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 #s(literal 1/4 binary64) (*.f64 (*.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)))))) #s(literal 1/2 binary64)) (*.f64 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (-.f64 (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) 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 (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)))))))
(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 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #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)))))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (-.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 #s(literal 1/4 binary64) (*.f64 (*.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)))))) #s(literal 1/2 binary64)) (*.f64 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 (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 #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))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 3 binary64) (-.f64 (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) 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 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) #s(literal -1 binary64))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) (+.f64 omega omega))) (-.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 #s(literal 1 binary64) (*.f64 e e)))) #s(literal -1/3 binary64))))))))) (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #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)))))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (-.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 (-.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 #s(literal 1/4 binary64) (*.f64 (*.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)))))) #s(literal 1/2 binary64)) (*.f64 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (-.f64 (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) 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 (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 (*.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #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)))) #s(literal 1/2 binary64))) (*.f64 J2 sgn)))) (-.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 #s(literal 1/4 binary64) (*.f64 (*.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)))) #s(literal 1/2 binary64))) (*.f64 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (-.f64 (*.f64 (sin.f64 (+.f64 (+.f64 omega omega) 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 (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))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (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 (*.f64 (sqrt.f64 (fabs.f64 (sin.f64 i))) (sqrt.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 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (*.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (+.f64 (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 (sin.f64 i) (sin.f64 i))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))) (*.f64 (*.f64 #s(literal 3 binary64) e) (sin.f64 (+.f64 (+.f64 (+.f64 f omega) omega) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (*.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (*.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))))) #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 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))))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (*.f64 (sin.f64 i) (sin.f64 i))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (*.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f omega) omega)) e) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (*.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (*.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))))
(if.f64 (<=.f64 f #s(literal -1148808356456833/79228162514264337593543950336 binary64)) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f omega) omega)) e) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (/.f64 req (*.f64 a a)) (*.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 (*.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (*.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))))
(if.f64 (<=.f64 f #s(literal -607985949695017/1125899906842624 binary64)) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f omega) omega)) e) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))) #s(literal 3 binary64))))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)) (/.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 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a)))) (*.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 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (*.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)) (/.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (*.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)) (/.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (*.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)) (/.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)) (/.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)) (/.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (*.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))))
(-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (/.f64 req a) a)) (*.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 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)) (/.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))))
(-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (sin.f64 (+.f64 (+.f64 omega omega) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (-.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 -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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))))
(-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (/.f64 req (*.f64 a a)) (*.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 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)) (/.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))))
(-.f64 (*.f64 (fabs.f64 (sin.f64 i)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (/.f64 req (*.f64 a a)) (*.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 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 (+.f64 f 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))) (*.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 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)) (/.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 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))))
(if.f64 (<=.f64 req #s(literal 7281407019368197/7914572847139345089936080672628710081124203171238778877250017794972711203409019749450124833959777439667125485632516458859243681097816038718961476963260581373331416708758372352 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.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 (*.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) e))) (if.f64 (<=.f64 req #s(literal 999999999999999921281879895665782741935503249059183851809998224123064148429897728 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (/.f64 (*.f64 (*.f64 (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))) (cos.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) req) J2) (*.f64 sgn (*.f64 #s(literal 1/8 binary64) e)))) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.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 (*.f64 #s(literal 1/2 binary64) req) (*.f64 (/.f64 req a) (/.f64 (*.f64 J2 sgn) (*.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) e)))))
(if.f64 (<=.f64 req #s(literal 6189700196426901/2475880078570760549798248448 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) req) sgn) J2) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (cos.f64 (+.f64 omega omega))) (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))))))) (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) #s(literal 1/8 binary64)) e) (*.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 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))))
(if.f64 (<=.f64 req #s(literal 6189700196426901/2475880078570760549798248448 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) req) sgn) J2) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (cos.f64 (+.f64 omega omega))) (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))))))) (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) #s(literal 1/8 binary64)) e) (*.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 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) (/.f64 #s(literal 40 binary64) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))))
(if.f64 (<=.f64 req #s(literal 6189700196426901/2475880078570760549798248448 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) req) sgn) J2) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (cos.f64 (+.f64 omega omega))) (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))))))) (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) #s(literal 1/8 binary64)) e) (*.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 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (*.f64 (/.f64 (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))))) #s(literal -40 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))))
(if.f64 (<=.f64 req #s(literal 6189700196426901/2475880078570760549798248448 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) req) sgn) J2) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (cos.f64 (+.f64 omega omega))) (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))))))) (*.f64 (/.f64 req a) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) #s(literal 1/8 binary64)) e) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (cos.f64 (+.f64 omega omega))) (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64))))))))
(if.f64 (<=.f64 a #s(literal 3055553964501729/1018517988167243043134222844204689080525734196832968125318070224677190649881668353091698688 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) req) sgn) J2) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (cos.f64 (+.f64 omega omega))) (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.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 (*.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) e))))
(if.f64 (<=.f64 req #s(literal 999999999999999921281879895665782741935503249059183851809998224123064148429897728 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (/.f64 (*.f64 (*.f64 (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))) (cos.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) req) J2) (*.f64 sgn (*.f64 #s(literal 1/8 binary64) e)))) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.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 (*.f64 #s(literal 1/2 binary64) req) (*.f64 (/.f64 req a) (/.f64 (*.f64 J2 sgn) (*.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) e))))
(*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 (*.f64 (*.f64 e (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2)) (*.f64 #s(literal 1/8 binary64) 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 #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 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 615015778615681/30750788930784052141961861920805916103932967295178766486232675904563738880488373075752592173385037335955677262580553574888172300969173988400174943873597051535522721474932336956770829721145939608862637129391729156728137068727028191720507858482133392040241659904 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.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 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (/.f64 (*.f64 req req) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) sgn)) (*.f64 #s(literal 1/8 binary64) e))) (if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 2000000000000000105009520510408840497408937162216318309831708231023604915977816391572742750160895728087408887665767756353885046470720861151289584369573413965696774401853151607475660467589576180118737906469941599890162238077935281760149305485560284989158517577640113685676231338944392773730918801080320 binary64)) (*.f64 (*.f64 (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) e) (*.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 (-.f64 #s(literal 1 binary64) (*.f64 e e)) #s(literal 1/8 binary64)))) (cos.f64 (+.f64 omega omega))) (*.f64 (*.f64 (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))) (*.f64 (/.f64 (/.f64 (*.f64 e (*.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 e e) #s(literal 1 binary64)) a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) #s(literal 1/8 binary64)))) (cos.f64 (+.f64 omega omega)))))
(if.f64 (<=.f64 req #s(literal 8034690221294951/803469022129495137770981046170581301261101496891396417650688 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) req) sgn) J2) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (cos.f64 (+.f64 omega omega))) (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))))) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 (*.f64 (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 (*.f64 e req) (/.f64 req (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) #s(literal 1/8 binary64)))) (cos.f64 (+.f64 omega omega))))
(if.f64 (<=.f64 (/.f64 req a) #s(literal 7442828536787015/1488565707357402911845015158554633286356257506687627387456491927921949262056238946972039271861787782268441644249633132407878864135402815488 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.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 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (/.f64 (*.f64 req req) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) sgn)) (*.f64 #s(literal 1/8 binary64) e))) (if.f64 (<=.f64 (/.f64 req a) #s(literal 10000000000000000171775323872177191180393104084305455107732328445200031262781885420082626742861173182722545959543542834786931126445173006249634549465088 binary64)) (*.f64 (*.f64 (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) e) (*.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 (-.f64 #s(literal 1 binary64) (*.f64 e e)) #s(literal 1/8 binary64)))) (cos.f64 (+.f64 omega omega))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 req (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) e) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.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)))))))))
(if.f64 (<=.f64 a #s(literal 6458492102628041/293567822846729153486185074598667128421960318613539983838411371441526128139326055432962374798096087878991872 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) req) (*.f64 (/.f64 (*.f64 J2 sgn) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (cos.f64 (+.f64 omega omega))) (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))))))) (*.f64 (*.f64 (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 (*.f64 e req) (/.f64 req (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) #s(literal 1/8 binary64)))) (cos.f64 (+.f64 omega omega))))
(if.f64 (<=.f64 a #s(literal 8021656346719887/23945242826029513411849172299223580994042798784118784 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 req (*.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) e) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))))) (-.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 (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 (*.f64 e req) (/.f64 req (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) #s(literal 1/8 binary64)))) (cos.f64 (+.f64 omega omega))))
(*.f64 (*.f64 (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (*.f64 (*.f64 e req) (/.f64 req (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) #s(literal 1/8 binary64)))) (cos.f64 (+.f64 omega omega)))
(*.f64 (*.f64 (-.f64 (+.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 -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 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 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) e))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) #s(literal 1/8 binary64)))) (cos.f64 (+.f64 omega omega)))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) e) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (/.f64 (*.f64 req req) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (-.f64 (-.f64 (*.f64 #s(literal -11/2 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)))))) (cos.f64 (+.f64 omega omega)))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 2113178124542661/1056589062271330492704679569833033213037694652072243044255921418053347805113449718948834511775314375789348789986514257357764695119005371074501077956925879153816773367998010168337463035352852882106048465816422376808296056585503123477676793797534072952979077161795475996672 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (/.f64 #s(literal 1 binary64) (/.f64 a (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 #s(literal 1 binary64) (/.f64 a (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req)))) (+.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 req a) (/.f64 #s(literal 1 binary64) (/.f64 a (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req)))) (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)))))))) (if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 5000000000000000265830098313298245178016947287622550486678486493521945761146082797297502145674652454512860840906256046981475222569026826936584608154510201938349585198667111756724875341881416615617731891764574033605618465285179569078272 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 e #s(literal -1 binary64)) (-.f64 e #s(literal -1 binary64))) (*.f64 (-.f64 e #s(literal 1 binary64)) (-.f64 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 (/.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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.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 (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))) (*.f64 (*.f64 (-.f64 e #s(literal -1 binary64)) (-.f64 e #s(literal -1 binary64))) (*.f64 (-.f64 e #s(literal 1 binary64)) (-.f64 e #s(literal 1 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 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)) (*.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 +inf.0 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 e #s(literal -1 binary64)) (-.f64 e #s(literal -1 binary64))) (*.f64 (-.f64 e #s(literal 1 binary64)) (-.f64 e #s(literal 1 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 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (+.f64 (+.f64 (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.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 e e) (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))) (*.f64 (*.f64 (-.f64 e #s(literal -1 binary64)) (-.f64 e #s(literal -1 binary64))) (*.f64 (-.f64 e #s(literal 1 binary64)) (-.f64 e #s(literal 1 binary64))))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (*.f64 e e) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))
(if.f64 (<=.f64 req #s(literal 37999999999999998855659651072 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 (fabs.f64 (-.f64 e #s(literal -1 binary64))) (fabs.f64 (-.f64 e #s(literal 1 binary64))))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (*.f64 (fabs.f64 (-.f64 e #s(literal -1 binary64))) (fabs.f64 (-.f64 e #s(literal 1 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 (fabs.f64 (-.f64 e #s(literal -1 binary64))) (fabs.f64 (-.f64 e #s(literal 1 binary64))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (*.f64 (fabs.f64 (-.f64 e #s(literal -1 binary64))) (fabs.f64 (-.f64 e #s(literal 1 binary64)))))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (fabs.f64 (-.f64 e #s(literal -1 binary64))) (fabs.f64 (-.f64 e #s(literal 1 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 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (*.f64 (fabs.f64 (-.f64 e #s(literal -1 binary64))) (fabs.f64 (-.f64 e #s(literal 1 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 (fabs.f64 (-.f64 e #s(literal -1 binary64))) (fabs.f64 (-.f64 e #s(literal 1 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 #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 req (*.f64 a a)) req)) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 (-.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 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 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 (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.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 (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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))))))))
(if.f64 (<=.f64 req #s(literal 37999999999999998855659651072 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 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (*.f64 e e) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))))) (+.f64 (*.f64 (*.f64 (*.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 (/.f64 req (*.f64 a a)) req)) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 (-.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 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 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 (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.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 (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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))))))))
(if.f64 (<=.f64 req #s(literal 37999999999999998855659651072 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 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (*.f64 e e) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))))) (+.f64 (*.f64 (*.f64 (*.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 (/.f64 req (*.f64 a a)) req)) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 (-.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 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 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 (pow.f64 (sqrt.f64 (*.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) e)) (fabs.f64 (-.f64 #s(literal 1 binary64) e)))) #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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.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 (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 (fabs.f64 (-.f64 #s(literal -1 binary64) e)) (fabs.f64 (-.f64 #s(literal 1 binary64) e)))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) e)) (fabs.f64 (-.f64 #s(literal 1 binary64) e)))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))))))))
(if.f64 (<=.f64 req #s(literal 37999999999999998855659651072 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 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (*.f64 e e) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))))) (+.f64 (*.f64 (*.f64 (*.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 (/.f64 req (*.f64 a a)) req)) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 (-.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 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 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 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.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 e e) (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) (*.f64 e e))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (*.f64 e e) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))))))))
(if.f64 (<=.f64 (cos.f64 i) #s(literal 3/4 binary64)) (+.f64 (*.f64 (*.f64 (*.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 (/.f64 req (*.f64 a a)) req)) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 (-.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 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 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 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.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 e e) (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) (*.f64 e e))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (*.f64 e e) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (-.f64 (*.f64 (cos.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) (*.f64 (sin.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))))
(if.f64 (<=.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega)))))))
(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 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 a a))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) req) (*.f64 a a)) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 1248699420126397/6243497100631984462763194459586332611497196285329942301718313919250743477639531240240612206126983942319653862242813245790895951358576570612580352 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (+.f64 (+.f64 (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e)) (*.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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.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 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)) #s(literal 1 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)))) (cos.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (/.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 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) (*.f64 (*.f64 (*.f64 (+.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 a) (/.f64 req a))) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 7729075046034517/7729075046034516689390703781863974688597854659412869997314470502903038284579120849072387533163845155924927232063004354354730157322085975311485817346934161497393961629646848 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 #s(literal 1 binary64) req) (*.f64 a a))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.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 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)) #s(literal 1 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)))) (cos.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (/.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 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) (*.f64 (*.f64 (*.f64 (+.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 a) (/.f64 req a))) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 7729075046034517/7729075046034516689390703781863974688597854659412869997314470502903038284579120849072387533163845155924927232063004354354730157322085975311485817346934161497393961629646848 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.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 (/.f64 req (*.f64 a a)) req)) (*.f64 #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 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a)))) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 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 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)) #s(literal 1 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)))) (cos.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (/.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 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) (*.f64 (*.f64 (*.f64 (+.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 a) (/.f64 req a))) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 7729075046034517/7729075046034516689390703781863974688597854659412869997314470502903038284579120849072387533163845155924927232063004354354730157322085975311485817346934161497393961629646848 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.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 (/.f64 req (*.f64 a a)) req)) (*.f64 #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 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a)))) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 (/.f64 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/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)) #s(literal 1 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)))) (cos.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 req (/.f64 (/.f64 req a) a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) (*.f64 (*.f64 (*.f64 (+.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 req (/.f64 (/.f64 req a) a))) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))))
(if.f64 (<=.f64 sgn #s(literal 8696971821798503/395316900990841051469717474060385365331165331570590074915822964897324881968740911898360124416869383779662261453743773264433220190206627884505885546759254902190463719290168674539974429183775813166483921247017080212035170866063852926988483116502264758478144641625700721781901200420372075258176420915324230983022866681823232 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (/.f64 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 (+.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 req (*.f64 (/.f64 req (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))))) (*.f64 (/.f64 (*.f64 (*.f64 req (*.f64 (/.f64 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 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/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)) #s(literal 1 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)))) (cos.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) (*.f64 (*.f64 (*.f64 (+.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 req (/.f64 req (*.f64 a a)))) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))))
(if.f64 (<=.f64 sgn #s(literal -5047255627099749/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.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 (/.f64 req (*.f64 a a)) req)) (*.f64 #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 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a)))) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 req (*.f64 a a))))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 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/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)) #s(literal 1 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)))) (cos.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) (*.f64 (*.f64 (*.f64 (+.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 req (/.f64 req (*.f64 a a)))) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64)))))
(-.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))))) (*.f64 (*.f64 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)) #s(literal 1 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)))) (cos.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) (*.f64 (*.f64 (+.f64 (+.f64 (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e)) (*.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)) req)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.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 (/.f64 req (*.f64 a a)) req)) (*.f64 #s(literal 1/8 binary64) e)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 (-.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 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 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 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) #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 #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 (*.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 (-.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 req (*.f64 a a)) req) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal -1/2 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)) #s(literal 1 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) (*.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 #s(literal 1/8 binary64) e))) (*.f64 (-.f64 (*.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 (-.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 req (*.f64 a a)) req) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) (*.f64 (*.f64 (-.f64 (+.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 #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 req (*.f64 a a)) req)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #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 a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) #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 #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 (*.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 (-.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 req (*.f64 a a)) req) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal -4999999999999999806650364166569307079328006902236455361130094053449438966813366112409962773319310362938839305792582281514490199870276609421048348021393177515819351843764207529142392373556426924143927678468362216346247556497408 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) (*.f64 sgn (*.f64 req (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.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 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) (*.f64 sgn (*.f64 req (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (cos.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal -6798566308054619/135971326161092377264534580877431968596375838138120172339057699379303311324378174141225600579898697131235668348479104259928724310439093053288837114564246362097620805333860664072122400768 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 req a)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64))) #s(literal -2 binary64))))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)) (*.f64 a (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) (*.f64 sgn (*.f64 req (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.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 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) (*.f64 sgn (*.f64 req (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (cos.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal -4999999999999999806650364166569307079328006902236455361130094053449438966813366112409962773319310362938839305792582281514490199870276609421048348021393177515819351843764207529142392373556426924143927678468362216346247556497408 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) (*.f64 sgn (*.f64 req (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.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 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) (*.f64 sgn (*.f64 req (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.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 sgn J2) #s(literal 2 binary64)) #s(literal -6798566308054619/135971326161092377264534580877431968596375838138120172339057699379303311324378174141225600579898697131235668348479104259928724310439093053288837114564246362097620805333860664072122400768 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 req a)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64))) #s(literal -2 binary64))))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)) (*.f64 a (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) (*.f64 sgn (*.f64 req (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.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 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) (*.f64 sgn (*.f64 req (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (-.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 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 5000000000000000262190592237531418597736900077214862305283068621659030917376859431910478415443928807994362318208466088914672700840093622075866148980296178635908453530060388827136 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (/.f64 req a)) (*.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64))) #s(literal -2 binary64)))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (/.f64 req a)) (*.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 #s(literal 1/8 binary64) (/.f64 req a)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64))) #s(literal -2 binary64))))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)) (*.f64 a (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 3432398830065305/6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057152 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 req a)) (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)) (*.f64 a (*.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 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (/.f64 req a) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.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)))))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 req a)) (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64))) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (/.f64 req a)) (*.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 #s(literal 1/8 binary64) (/.f64 req a)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64))) #s(literal -2 binary64))))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)) (*.f64 a (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) J2)) (*.f64 sgn (/.f64 req (*.f64 a a)))) (*.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 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) J2)) (*.f64 sgn (/.f64 req (*.f64 a a)))) (*.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 #s(literal 1/8 binary64) (/.f64 req a)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64))) #s(literal -2 binary64))))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)) (*.f64 a (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn req)) (*.f64 a (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 req a))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn req)) (*.f64 a (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))))
(-.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 req a)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64))) #s(literal -2 binary64))))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)) (*.f64 a (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))
(if.f64 (<=.f64 (-.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 0 binary64)) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sin.f64 (+.f64 omega omega)) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64))) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)) (*.f64 a (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a))) #s(literal 1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) e) e)) (-.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64))) #s(literal -2 binary64))))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a))) (-.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))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i)))))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a))) #s(literal 1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) e) e)) (-.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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 5/2 binary64)) #s(literal 5/2 binary64))) #s(literal -2 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.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)) (*.f64 (cos.f64 i) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn) req) req) (*.f64 (*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a)))))))
(+.f64 (+.f64 (*.f64 (*.f64 (cos.f64 Omega) dOmega) (sin.f64 (*.f64 #s(literal 1/2 binary64) i))) (*.f64 (*.f64 (*.f64 (sin.f64 Omega) di) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) i)))) (*.f64 (sin.f64 Omega) (sin.f64 (*.f64 #s(literal 1/2 binary64) i))))
(-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) i)) dOmega) (cos.f64 Omega)) (*.f64 (-.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) i)) (*.f64 (*.f64 #s(literal 1/2 binary64) di) (cos.f64 (*.f64 #s(literal -1/2 binary64) i)))) (sin.f64 Omega)))
(-.f64 (*.f64 (*.f64 (cos.f64 Omega) dOmega) (sin.f64 (*.f64 #s(literal 1/2 binary64) i))) (*.f64 (-.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) i)) (*.f64 (*.f64 #s(literal 1/2 binary64) di) (cos.f64 (*.f64 #s(literal -1/2 binary64) i)))) (sin.f64 Omega)))
(-.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))
(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 (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 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (-.f64 (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 (sin.f64 i) (sin.f64 i))) (*.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 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f)))))))))) (+.f64 a (*.f64 a (*.f64 sgn (*.f64 (/.f64 req a) (*.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)) #s(literal -3 binary64)) (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64)))) (*.f64 (sin.f64 i) (neg.f64 (sin.f64 i)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (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 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 3/2 binary64)) #s(literal 1 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) (/.f64 req a)))))))
(if.f64 (<=.f64 (pow.f64 (cos.f64 i) #s(literal 2 binary64)) #s(literal 2251799813596527/2251799813685248 binary64)) (+.f64 a (*.f64 a (*.f64 sgn (*.f64 (/.f64 req a) (*.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)) #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 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (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 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 3/2 binary64)) #s(literal 1 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) (/.f64 req a)))))) (+.f64 a (*.f64 a (*.f64 sgn (*.f64 (/.f64 req a) (*.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)) #s(literal -3 binary64)) (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64)))) (*.f64 (sin.f64 i) (neg.f64 (sin.f64 i)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (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 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 3/2 binary64)) #s(literal 1 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) (/.f64 req a)))))))
(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 (*.f64 sgn (/.f64 req a)) (*.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)) #s(literal -3 binary64)) (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64)))) (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64))) (-.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (/.f64 req a))) a))) (+.f64 a (*.f64 a (*.f64 sgn (*.f64 (/.f64 req a) (*.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)) #s(literal -3 binary64)) (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64)))) (*.f64 (sin.f64 i) (neg.f64 (sin.f64 i)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (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 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 3/2 binary64)) #s(literal 1 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) (/.f64 req a)))))))
(+.f64 a (*.f64 a (*.f64 (*.f64 sgn (*.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)) #s(literal -3 binary64)) (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64)))) (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (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 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 3/2 binary64)) #s(literal 1 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) (/.f64 req a))) (/.f64 req a))))
(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 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 3 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -3/2 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (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 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 3/2 binary64)) #s(literal 1 binary64))))))) (+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -3 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))) (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64)))) (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (-.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))))))) req) (/.f64 req (*.f64 a a)))))))
(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 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 3 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -3/2 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (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 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 3/2 binary64)) #s(literal 1 binary64))))))) (+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal 3/2 binary64)) #s(literal -3 binary64)) (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64))) (-.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))))) req) req) (*.f64 a a)))))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (/.f64 req a) (*.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)) #s(literal -3 binary64)) (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64)))) (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (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 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 3/2 binary64)) #s(literal 1 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) (/.f64 req a))))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 J2 #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal 3/2 binary64)) #s(literal -3 binary64)) (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64))) (-.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))))) (*.f64 req (/.f64 req a))) a)))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 3 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -3/2 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (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 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 3/2 binary64)) #s(literal 1 binary64))))) (*.f64 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 (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal 3/2 binary64)) #s(literal -3 binary64)) (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal -1 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64))) (-.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))))) req) req) (*.f64 a a))))))
(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 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 (*.f64 #s(literal 5 binary64) (cos.f64 i)) (cos.f64 i))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 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 (*.f64 #s(literal 5 binary64) (cos.f64 i)) (cos.f64 i)))) (/.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 (*.f64 #s(literal 5 binary64) (cos.f64 i)) (cos.f64 i))) #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 (*.f64 #s(literal 5 binary64) (cos.f64 i)) (cos.f64 i))))) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (*.f64 (-.f64 #s(literal 3 binary64) (*.f64 (*.f64 #s(literal 5 binary64) (cos.f64 i)) (cos.f64 i))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (cos.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f 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 (*.f64 #s(literal 5 binary64) (cos.f64 i)) (cos.f64 i))))) (/.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 5 binary64) (cos.f64 i)) (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 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 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (cos.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))) (neg.f64 (*.f64 (*.f64 #s(literal 3 binary64) e) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))))) (neg.f64 (*.f64 e (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))))) (-.f64 (+.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.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))))) (*.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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #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 #s(literal 5/2 binary64) (*.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))))) (*.f64 #s(literal 1/16 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))))))))) (*.f64 (-.f64 (*.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 (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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))))) (*.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 #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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) #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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) #s(literal -11 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 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))))) (*.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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))) (-.f64 #s(literal 3 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 binary64)) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 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 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 (*.f64 (*.f64 (cos.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))) #s(literal 3 binary64)) (*.f64 (*.f64 (sin.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) #s(literal 3 binary64))) (*.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 (*.f64 (*.f64 (cos.f64 (+.f64 f f)) (sin.f64 (+.f64 omega omega))) #s(literal 3 binary64)) (*.f64 (*.f64 (sin.f64 (+.f64 f f)) (cos.f64 (+.f64 omega omega))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (*.f64 #s(literal 3 binary64) e) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))))) (neg.f64 (*.f64 e (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))))) (-.f64 (+.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.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))))) (*.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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #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 #s(literal 5/2 binary64) (*.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))))) (*.f64 #s(literal 1/16 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))))))))) (*.f64 (-.f64 (*.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 (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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))))) (*.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 #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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) #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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) #s(literal -11 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 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))))) (*.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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))) (-.f64 #s(literal 3 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 binary64)) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 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 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) (+.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 (*.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) (+.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 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.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))))) (*.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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #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 #s(literal 5/2 binary64) (*.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))))) (*.f64 #s(literal 1/16 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))))))))) (*.f64 (-.f64 (*.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 (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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))))) (*.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 #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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) #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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) #s(literal -11 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 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))))) (*.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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))) (-.f64 #s(literal 3 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 binary64)) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 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 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 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (cos.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))))) (*.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 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (cos.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))) (-.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 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.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))))) (*.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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #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 #s(literal 5/2 binary64) (*.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))))) (*.f64 #s(literal 1/16 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))))))))) (*.f64 (-.f64 (*.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 (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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))))) (*.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 #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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) #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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) #s(literal -11 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 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))))) (*.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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))) (-.f64 #s(literal 3 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 binary64)) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))))))))
(if.f64 (<=.f64 a #s(literal -3000000000000000302480504101887593093896787388650220353495093069701123299063756169161048638248763581703286644188658439930477805568 binary64)) (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 req a) (/.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 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 (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)))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req a) (/.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)))))))) (sin.f64 (+.f64 omega omega))) (+.f64 Omega (+.f64 omega M))) (*.f64 (*.f64 (*.f64 (*.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 -6 binary64)) (*.f64 (-.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 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 req a) (/.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 (/.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req 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 f (+.f64 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 #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))))) (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 omega M) Omega) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) (*.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 (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 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.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 (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))))))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (-.f64 (*.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 (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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))))) (*.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 #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 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 (+.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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.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))))) (*.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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #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 #s(literal 5/2 binary64) (*.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))))) (*.f64 #s(literal 1/16 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))))))))) (*.f64 (-.f64 (*.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 (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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))))) (*.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 #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 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) #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/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))) #s(literal -11 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 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))))) (*.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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))) (-.f64 #s(literal 3 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 binary64)) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 5/2 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal 5 binary64))))))))
(-.f64 (+.f64 (+.f64 (+.f64 omega M) Omega) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) (*.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 (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 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.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 (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))))))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (-.f64 (*.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 (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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))))) (*.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 #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 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 (+.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) (sin.f64 (*.f64 (+.f64 omega f) #s(literal 2 binary64)))))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) (*.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 (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 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.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 (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))))))))) (sin.f64 (+.f64 omega omega))) (+.f64 (+.f64 omega M) Omega)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (-.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e)) #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))) #s(literal 5 binary64)))) (*.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))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal -6 binary64)))) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (*.f64 (-.f64 (+.f64 (*.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 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e)) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) 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 (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)))))))
(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 2000000000000000034432129193472909657662175650026477964657784035784761342489150095975840903750919189137212277723396582120622098451065897041393877611422881300245257029338856920713985249936056659101378448350568693460121432177658428510879389260239589093011024831235964286525341725837632725724238309498254524416 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 (*.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)))))))) (*.f64 #s(literal 1/16 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)))))))) (sin.f64 (+.f64 omega omega))) (+.f64 Omega (+.f64 omega M))) (*.f64 (*.f64 (*.f64 (*.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 -6 binary64)) (*.f64 (-.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 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M)))) (*.f64 #s(literal 1/4 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 (/.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 f (+.f64 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 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) (*.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 (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 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.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 (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))))))))) (sin.f64 (+.f64 omega omega))) (+.f64 (+.f64 omega M) Omega)) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (*.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.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 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e)) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) 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 (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 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.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 -6 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 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e)) #s(literal -3 binary64))) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M)))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 200000000000000000356669989717583673029127285120602785421403055540259005695579907124093741598568592199753794072441956471287615292063257246907506366505126894812266496 binary64)) (-.f64 (+.f64 (*.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 #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 #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 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 req (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 req (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 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 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 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 #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 (sin.f64 f) e) f) M) #s(literal -6 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (/.f64 (*.f64 req (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (*.f64 a a) (*.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 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.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 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 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) (*.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 (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 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.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 (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))))))))) (sin.f64 (+.f64 omega omega))) (+.f64 (+.f64 omega M) Omega)) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (*.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.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 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e)) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) 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 (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 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.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 -6 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 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (+.f64 f omega) omega)) e)) #s(literal -3 binary64))) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M)))))))
(-.f64 (+.f64 (*.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 #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 #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 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 req (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 req (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 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 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 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 #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 (sin.f64 f) e) f) M) #s(literal -6 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (/.f64 (*.f64 req (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (*.f64 a a) (*.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 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.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 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 (-.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 #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 req) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.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 (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 req req) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.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/4 binary64) (*.f64 (*.f64 req req) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 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 (+.f64 f omega) omega)) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 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 #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 (sin.f64 f) e) f) M) #s(literal -6 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 i)) (*.f64 (*.f64 req req) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.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 req req) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.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)))))))
(pow.f64 #s(literal 10 binary64) (+.f64 (+.f64 (+.f64 (-.f64 (+.f64 (-.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) (-.f64 #s(literal 2634/5 binary64) alt)) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 1003600000000/25116765644210149547 binary64)) (*.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 (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 (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 #s(literal 60713/100000 binary64) (-.f64 (-.f64 (*.f64 (*.f64 #s(literal 10000/2928563 binary64) alt) (*.f64 #s(literal 10000/2928563 binary64) alt)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 10000/2928563 binary64) alt) #s(literal 5268000/2928563 binary64)))) #s(literal -27751824000000/8576481244969 binary64)))) (+.f64 (*.f64 alt #s(literal -23024/2928563 binary64)) #s(literal 60645216/14642815 binary64))) (neg.f64 #s(literal 503/40 binary64))))
(pow.f64 #s(literal 10 binary64) (+.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) #s(literal 23024/2928563 binary64)) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal 10000/2928563 binary64) alt) #s(literal 5268000/2928563 binary64)) #s(literal 4 binary64)) #s(literal 5269/10000 binary64))) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal 10000/2928563 binary64) alt) #s(literal 5268000/2928563 binary64)) #s(literal 5 binary64)) #s(literal 5889/10000 binary64))) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal 10000/2928563 binary64) alt) #s(literal 5268000/2928563 binary64)) #s(literal 6 binary64)) #s(literal -34047/100000 binary64))) #s(literal 503/40 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) (-.f64 #s(literal 2634/5 binary64) alt)) (-.f64 (*.f64 #s(literal 1003600000000/25116765644210149547 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal -60713000/8576481244969 binary64)))))
(pow.f64 #s(literal 10 binary64) (+.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) #s(literal 23024/2928563 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 4 binary64)) #s(literal 5269/10000 binary64))) (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 5 binary64)) #s(literal 5889/10000 binary64))) (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 6 binary64)) #s(literal -34047/100000 binary64))) #s(literal 503/40 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) (-.f64 #s(literal 2634/5 binary64) alt)) (-.f64 (*.f64 #s(literal 1003600000000/25116765644210149547 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal -60713000/8576481244969 binary64)))))
(pow.f64 #s(literal 10 binary64) (+.f64 (-.f64 (-.f64 (-.f64 #s(literal -503/40 binary64) (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 5 binary64)) #s(literal 5889/10000 binary64))) (*.f64 #s(literal -34047/100000 binary64) (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 6 binary64)))) (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 4 binary64)) #s(literal 5269/10000 binary64))) (-.f64 (*.f64 #s(literal 23024/2928563 binary64) (-.f64 #s(literal 2634/5 binary64) alt)) (*.f64 (-.f64 #s(literal -60713000/8576481244969 binary64) (*.f64 #s(literal 1003600000000/25116765644210149547 binary64) (-.f64 alt #s(literal 2634/5 binary64)))) (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) (-.f64 #s(literal 2634/5 binary64) alt))))))
(pow.f64 #s(literal 10 binary64) (+.f64 (-.f64 #s(literal -503/40 binary64) (-.f64 (-.f64 (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal 10000/2928563 binary64) alt) #s(literal 5268000/2928563 binary64)) #s(literal 4 binary64)) #s(literal 5269/10000 binary64)) (-.f64 (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal 10000/2928563 binary64) alt) #s(literal 5268000/2928563 binary64)) #s(literal 5 binary64)) #s(literal -5889/10000 binary64)) (*.f64 #s(literal -34047/100000 binary64) (pow.f64 (-.f64 (*.f64 #s(literal 10000/2928563 binary64) alt) #s(literal 5268000/2928563 binary64)) #s(literal 6 binary64))))) (*.f64 #s(literal -23024/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))))) (*.f64 (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) (-.f64 #s(literal 2634/5 binary64) alt)) (-.f64 (*.f64 #s(literal 1003600000000/25116765644210149547 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal -60713000/8576481244969 binary64)))))
(pow.f64 #s(literal 10 binary64) (+.f64 (-.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 4 binary64)) #s(literal 5269/10000 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 #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 #s(literal -23024/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))))) (*.f64 (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) (-.f64 #s(literal 2634/5 binary64) alt)) (-.f64 (*.f64 #s(literal 1003600000000/25116765644210149547 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal -60713000/8576481244969 binary64)))))
(*.f64 (sqrt.f64 (fabs.f64 p)) (sqrt.f64 (fabs.f64 mu)))
(sqrt.f64 (*.f64 mu p))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e))) (-.f64 N (-.f64 (*.f64 (sinh.f64 N) e) (*.f64 (*.f64 (cosh.f64 N) e) N))))
(/.f64 (-.f64 (-.f64 (*.f64 (sinh.f64 N) e) N) (*.f64 (-.f64 (*.f64 (cosh.f64 N) e) #s(literal 0 binary64)) N)) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)))
(/.f64 (-.f64 (+.f64 N (*.f64 (*.f64 (cosh.f64 N) e) N)) (*.f64 (sinh.f64 N) e)) (-.f64 (*.f64 (cosh.f64 N) e) #s(literal 1 binary64)))
(-.f64 N (*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (cosh.f64 N) e) #s(literal 1 binary64))) (-.f64 N (-.f64 (/.f64 (sinh.f64 N) (/.f64 #s(literal 1 binary64) e)) N))))
(-.f64 N (/.f64 (-.f64 (*.f64 (sinh.f64 N) e) (+.f64 N N)) (-.f64 (*.f64 e (cosh.f64 N)) #s(literal 1 binary64))))
(-.f64 M (/.f64 (*.f64 (sin.f64 M) e) (-.f64 (*.f64 (cos.f64 M) e) #s(literal 1 binary64))))
(*.f64 (atan.f64 (*.f64 (tanh.f64 (*.f64 #s(literal 1/2 binary64) H)) (sqrt.f64 (/.f64 (-.f64 #s(literal -1 binary64) e) (-.f64 #s(literal 1 binary64) e))))) #s(literal 2 binary64))
(*.f64 (-.f64 e (/.f64 H (sinh.f64 H))) (sinh.f64 H))
(-.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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) e)))) #s(literal 2 binary64))
(-.f64 Ecc (*.f64 e (sin.f64 Ecc)))