(if.f64 (<=.f64 h #s(literal 10000000000000000139372116959414099130712064 binary64)) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) mu) (/.f64 (sin.f64 i) h)) (*.f64 (*.f64 mu (/.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) h)) (sin.f64 i)))
(if.f64 (<=.f64 (neg.f64 (/.f64 mu h)) #s(literal -39999999999999997354419793389718982494878008657213260744467712892308025867984145905027697303833837886836582183987940859021575232537792511731178340216149144699775400017920 binary64)) (*.f64 mu (/.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (sin.f64 i)) h)) (if.f64 (<=.f64 (neg.f64 (/.f64 mu h)) #s(literal -3794275180128377/948568795032094272909893509191171341133987714380927500611236528192824358010355712 binary64)) (*.f64 (*.f64 (sin.f64 i) (/.f64 mu h)) (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta))) (*.f64 (*.f64 mu (/.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) h)) (sin.f64 i))))
(if.f64 (<=.f64 h #s(literal 199999999999999990561044450276333613382502582705723397060843246977024 binary64)) (*.f64 mu (/.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (sin.f64 i)) h)) (*.f64 (*.f64 mu (/.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) h)) (sin.f64 i)))
(*.f64 mu (/.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (sin.f64 i)) h))
(*.f64 mu (*.f64 (sin.f64 i) (/.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) h)))
(if.f64 (<=.f64 mu #s(literal 4835703278458517/1208925819614629174706176 binary64)) (/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN)) (*.f64 (cos.f64 i) (+.f64 (*.f64 (*.f64 (cos.f64 AN) e) (cos.f64 AP)) (*.f64 (cos.f64 theta) (cos.f64 AN))))) (neg.f64 mu)) h) (*.f64 (/.f64 mu h) (-.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (*.f64 (sin.f64 AP) (sin.f64 AN)) e)) (*.f64 (sin.f64 theta) (sin.f64 AN)))))
(if.f64 (<=.f64 mu #s(literal 4835703278458517/1208925819614629174706176 binary64)) (/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN)) (*.f64 (cos.f64 i) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 AN)))) (neg.f64 mu)) h) (*.f64 (/.f64 mu h) (-.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (*.f64 (sin.f64 AP) (sin.f64 AN)) e)) (*.f64 (sin.f64 theta) (sin.f64 AN)))))
(if.f64 (<=.f64 mu #s(literal 4835703278458517/1208925819614629174706176 binary64)) (/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN)) (*.f64 (cos.f64 i) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 AN)))) (neg.f64 mu)) h) (*.f64 (/.f64 mu h) (-.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (*.f64 e (sin.f64 AN)) (sin.f64 AP))) (*.f64 (sin.f64 theta) (sin.f64 AN)))))
(if.f64 (<=.f64 mu #s(literal 4722366482869645/4722366482869645213696 binary64)) (/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN)) (*.f64 (cos.f64 i) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 AN)))) (neg.f64 mu)) h) (*.f64 mu (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 i) e) (cos.f64 AP)) (*.f64 (cos.f64 i) (cos.f64 theta))) (cos.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h)))
(if.f64 (<=.f64 mu #s(literal 6338253001141147/1267650600228229401496703205376 binary64)) (/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN)) (*.f64 (cos.f64 i) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 AN)))) (neg.f64 mu)) h) (*.f64 mu (/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h)))
(if.f64 (<=.f64 mu #s(literal 6338253001141147/1267650600228229401496703205376 binary64)) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) mu) h) (*.f64 mu (/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h)))
(if.f64 (<=.f64 h #s(literal 859999999999999991304335306110166450234029523432344626635026744938536257355708075333184975109236962448722275993049921730015857857246784257898350670080192356041097216 binary64)) (*.f64 (/.f64 mu h) (-.f64 (*.f64 (cos.f64 i) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN)))) (*.f64 mu (/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h)))
(*.f64 mu (/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (cos.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (sin.f64 AN))) h))
(if.f64 (<=.f64 mu #s(literal 2499999999999999918390018751648879805686600901662494978316506154658250805477376 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 (neg.f64 mu) (/.f64 h (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (cos.f64 i)) (sin.f64 AN)) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))))))
(if.f64 (<=.f64 mu #s(literal 3500000000000000132571709850489338051206618645930068717053488461558530629959680 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 (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 (neg.f64 mu) (/.f64 (+.f64 (*.f64 (cos.f64 i) (*.f64 (+.f64 (*.f64 (cos.f64 AP) e) (cos.f64 theta)) (sin.f64 AN))) (*.f64 (+.f64 (*.f64 (sin.f64 AP) e) (sin.f64 theta)) (cos.f64 AN))) h))
(-.f64 a (*.f64 (*.f64 e a) e))
(*.f64 a (-.f64 #s(literal 1 binary64) (*.f64 e e)))
(*.f64 (*.f64 (sin.f64 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 (*.f64 r (*.f64 (cos.f64 i) (cos.f64 AN))) (sin.f64 theta)))
(*.f64 r (+.f64 (*.f64 (sin.f64 AN) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 i) (sin.f64 theta)) (cos.f64 AN))))
(*.f64 r (+.f64 (*.f64 (sin.f64 AN) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 AN) (sin.f64 theta)) (cos.f64 i))))
(+.f64 (*.f64 (*.f64 (cos.f64 AN) r) (cos.f64 theta)) (*.f64 (*.f64 (neg.f64 (sin.f64 AN)) (*.f64 (cos.f64 i) (sin.f64 theta))) r))
(-.f64 (*.f64 (*.f64 (cos.f64 AN) r) (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 theta) r) (*.f64 (cos.f64 i) (sin.f64 AN))))
(*.f64 r (-.f64 (*.f64 (cos.f64 AN) (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 AN) (sin.f64 theta)) (cos.f64 i))))
(*.f64 r (-.f64 (*.f64 (cos.f64 AN) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 i) (sin.f64 theta)) (sin.f64 AN))))
(/.f64 p (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))))
(*.f64 (atanh.f64 (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) f)) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) e) (-.f64 #s(literal -1 binary64) e))))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (atan2.f64 (*.f64 (/.f64 (sqrt.f64 (fabs.f64 (+.f64 (*.f64 (neg.f64 e) #s(literal 2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sin.f64 (*.f64 f #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) e)) (cos.f64 (*.f64 f #s(literal 1/2 binary64))))))
(*.f64 #s(literal 2 binary64) (atan2.f64 (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) e)) (sin.f64 (*.f64 f #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (+.f64 (+.f64 e #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 f #s(literal 1/2 binary64))))))
(*.f64 (atan2.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) f)) (sqrt.f64 (-.f64 #s(literal 1 binary64) e))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) f)) (sqrt.f64 (-.f64 e #s(literal -1 binary64))))) #s(literal 2 binary64))
(if.f64 (<=.f64 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -inf.0 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 Cd m) v) (*.f64 #s(literal -500 binary64) density)) (*.f64 v A)) (if.f64 (<=.f64 (*.f64 (*.f64 (neg.f64 #s(literal 1/2 binary64)) density) (/.f64 (*.f64 Cd A) m)) #s(literal -7540071506325551/377003575316277553052632783947358479815640765734281611362288441560101396530857955835685848633641608981764089063400052322800846281248691448694119974860434438887084693231743502178167752441192448774799271819130974018130465379775860716808779827596916922071594850183201524526501846714374614008118077197384100897810808832 binary64)) (*.f64 v (*.f64 (*.f64 #s(literal 1000000 binary64) v) (*.f64 #s(literal -1/2000 binary64) (*.f64 (/.f64 (*.f64 A Cd) m) density)))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal -500 binary64) density) v) m) A) (*.f64 v Cd))))
(if.f64 (<=.f64 (/.f64 (*.f64 Cd A) m) #s(literal 49999999999999999022774886740757079728938194623363135957072991575057002693164136229634719617248991824711074298971975169209998501584220122192048645407522035152272390608472804163584 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1000 binary64) v) density) (*.f64 (/.f64 (*.f64 A Cd) m) #s(literal -1/2 binary64))) (*.f64 v #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 v m) Cd) #s(literal -500 binary64)) (*.f64 density (*.f64 v A))))
(if.f64 (<=.f64 (/.f64 (*.f64 Cd A) m) #s(literal 3618502788666131/1809251394333065553493296640760748560207343510400633813116524750123642650624 binary64)) (*.f64 (*.f64 (/.f64 v m) (*.f64 (*.f64 #s(literal -500 binary64) density) v)) (*.f64 A Cd)) (if.f64 (<=.f64 (/.f64 (*.f64 Cd A) m) #s(literal 4999999999999999741765937233656071607197384188641043675980257306542464535243513709626268724544510441942600211306712813010944 binary64)) (*.f64 (*.f64 (/.f64 Cd m) A) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) density) v) v)) (*.f64 (*.f64 (*.f64 (/.f64 v m) Cd) #s(literal -500 binary64)) (*.f64 density (*.f64 v A)))))
(if.f64 (<=.f64 m #s(literal 8073110924545181/598008216632976371697735644702348584536405246902083247220875921706093794716375762404103004004990504111786204800430166155026589905240121409306972824498630058082565445957748647537262486126146850127872 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) v) (/.f64 (*.f64 v density) m)) (*.f64 A Cd)) (if.f64 (<=.f64 m #s(literal 2740315569995443/365375409332725729550921208179070754913983135744 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 v m) Cd) #s(literal -500 binary64)) (*.f64 A density)) v) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 v m) A) Cd) (*.f64 #s(literal -500 binary64) density)) v)))
(if.f64 (<=.f64 v #s(literal 5934344573412455/28948022309329048855892746252171976963317496166410141009864396001978282409984 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 v m) Cd) #s(literal -500 binary64)) (*.f64 density (*.f64 v A))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal -500 binary64) density) v) m) A) (*.f64 v Cd)))
(if.f64 (<=.f64 m #s(literal 4242751136953197/9223372036854775808 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 Cd m) v) (*.f64 #s(literal -500 binary64) density)) (*.f64 v A)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 v m) A) Cd) (*.f64 #s(literal -500 binary64) density)) v))
(if.f64 (<=.f64 m #s(literal 272346098576959/418993997810706159361688281193932691483730181893512293053861295116305125939798343025058571817715732115313495568327689089179808837873330310826051531440128 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) v) (/.f64 (*.f64 v density) m)) (*.f64 A Cd)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 v m) A) Cd) (*.f64 #s(literal -500 binary64) density)) v))
(if.f64 (<=.f64 v #s(literal 7509100025308133/441711766194596082395824375185729628956870974218904739530401550323154944 binary64)) (*.f64 (*.f64 (*.f64 v A) (/.f64 Cd m)) (*.f64 (*.f64 #s(literal -500 binary64) density) v)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) v) (/.f64 (*.f64 v density) m)) (*.f64 A Cd)))
(if.f64 (<=.f64 Cd #s(literal 40999999999999998070888595456 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) v) (/.f64 (*.f64 v density) m)) (*.f64 A Cd)) (*.f64 A (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) density) Cd) v) v) m)))
(if.f64 (<=.f64 m #s(literal 3100000000000000131470934807390178148562426442750024409370430654921397350484520334943579647750983521503543296 binary64)) (*.f64 A (*.f64 (*.f64 (*.f64 (/.f64 Cd m) v) (*.f64 #s(literal -500 binary64) density)) v)) (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) density) (*.f64 (*.f64 v v) Cd)) (/.f64 A m)))
(if.f64 (<=.f64 m #s(literal 1000000000000 binary64)) (*.f64 A (*.f64 (*.f64 (*.f64 (/.f64 Cd m) v) (*.f64 #s(literal -500 binary64) density)) v)) (*.f64 A (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) density) Cd) v) v) m)))
(if.f64 (<=.f64 m #s(literal 3399999999999999912935387072172242194919355287860510119071672152202983724394488001565503894704418087966842832641420776371932450751272998980423597766059029954560 binary64)) (*.f64 A (*.f64 (*.f64 (*.f64 (/.f64 Cd m) v) (*.f64 #s(literal -500 binary64) density)) v)) (*.f64 A (*.f64 (*.f64 (*.f64 v v) Cd) (/.f64 (*.f64 #s(literal -500 binary64) density) m))))
(*.f64 A (*.f64 (*.f64 (*.f64 v v) Cd) (/.f64 (*.f64 #s(literal -500 binary64) density) m)))
(*.f64 A (*.f64 (*.f64 (*.f64 #s(literal -500 binary64) density) (/.f64 Cd m)) (*.f64 v v)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 Omega) di) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) i))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) i)) (-.f64 (cos.f64 Omega) (*.f64 (sin.f64 Omega) dOmega))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) di) (cos.f64 (*.f64 #s(literal -1/2 binary64) i))) (cos.f64 Omega)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) i)) (-.f64 (cos.f64 Omega) (*.f64 (sin.f64 Omega) dOmega))))
(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 999999999999999928454223448636526995609414612446486912536395043045051171498417578302416590307106934377352009423588636134254484622941461177838218040629861358615028052178586193608330530158506646130887048916655460323666687950848 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))))) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (*.f64 (*.f64 req (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn)) (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))))
(if.f64 (<=.f64 (-.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 999999999999999928454223448636526995609414612446486912536395043045051171498417578302416590307106934377352009423588636134254484622941461177838218040629861358615028052178586193608330530158506646130887048916655460323666687950848 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))))) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.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 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.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 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))))
(if.f64 (<=.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal 500000000000000026252380127602210124352234290554079577457927057755901228994454097893185687540223932021852221916441939088471261617680215287822396092393353491424193600463287901868915116897394045029684476617485399972540559519483820440037326371390071247289629394410028421419057834736098193432729700270080 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))))) (pow.f64 (sin.f64 i) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 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) req) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) 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) req) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.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 999999999999999928454223448636526995609414612446486912536395043045051171498417578302416590307106934377352009423588636134254484622941461177838218040629861358615028052178586193608330530158506646130887048916655460323666687950848 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 #s(literal 1 binary64) (/.f64 a (*.f64 req #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 #s(literal 1 binary64) (/.f64 a (*.f64 req #s(literal 1/2 binary64)))) (*.f64 J2 sgn)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.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)))) (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) req) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.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 999999999999999928454223448636526995609414612446486912536395043045051171498417578302416590307106934377352009423588636134254484622941461177838218040629861358615028052178586193608330530158506646130887048916655460323666687950848 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) 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 (-.f64 #s(literal -1/3 binary64) (-.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))))) (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 #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))) (sin.f64 f))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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)))) (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) req) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.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 999999999999999928454223448636526995609414612446486912536395043045051171498417578302416590307106934377352009423588636134254484622941461177838218040629861358615028052178586193608330530158506646130887048916655460323666687950848 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.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)))) (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) req) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.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 -404804506615/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 req (*.f64 (-.f64 (*.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/2 binary64) J2) sgn)))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 req (*.f64 (-.f64 (*.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/2 binary64) J2) sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.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)))) (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) req) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.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 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 0 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)))) #s(literal 1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 req req) sgn) (*.f64 #s(literal 1/2 binary64) J2)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 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)))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req req) sgn) (*.f64 #s(literal 1/2 binary64) J2)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 (+.f64 (+.f64 omega omega) f))) (*.f64 (-.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)))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 49999999999999997990838700394884966306179965866660791642559438972038274233224047478954738152480007945403339428690378003153531301288658660066937768081850142259483599048726809116347987831785023273225189328871239835991361038587494628380365594466675565382886953520237123630792704 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 req (*.f64 (-.f64 (*.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/2 binary64) J2) sgn)))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 req (*.f64 (-.f64 (*.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/2 binary64) J2) sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (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 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 (-.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 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 0 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)))) #s(literal 1/8 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 req req) sgn) (*.f64 #s(literal 1/2 binary64) J2)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 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)))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req req) sgn) (*.f64 #s(literal 1/2 binary64) J2)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 (+.f64 (+.f64 omega omega) f))) (*.f64 (-.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)))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 100000000000000006533477610574617307003210399478293629775643192173126922026988747893522897194624310120140586361897943794063686207001388689898137223574581962294638641248120402340847172549022642470747494264132908839774942043776657045497009088429335535195969814528 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 req (*.f64 (-.f64 (*.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/2 binary64) J2) sgn)))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 req (*.f64 (-.f64 (*.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/2 binary64) J2) sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 req #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (/.f64 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 req #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (/.f64 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 50000000000000003655594109162742628555807976785210253502111881222055621111889642593768170507192870633380534399984881562667451395802621522335273454126423719521965288027138792366781230788927329390738942424252416 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 req (*.f64 (-.f64 (*.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/2 binary64) J2) sgn)))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 req (*.f64 (-.f64 (*.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/2 binary64) J2) sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req a)) J2) sgn) (*.f64 (*.f64 a #s(literal 2 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 req (/.f64 req a)) J2) sgn) (*.f64 (*.f64 a #s(literal 2 binary64)) (*.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))))))))
(if.f64 (<=.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sin.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 e (cos.f64 f))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 req (*.f64 (-.f64 (*.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/2 binary64) J2) sgn)))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 req (*.f64 (-.f64 (*.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/2 binary64) J2) sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.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 req) sgn) (*.f64 #s(literal 1/2 binary64) J2)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 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)))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req req) sgn) (*.f64 #s(literal 1/2 binary64) J2)) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) (sin.f64 (+.f64 (+.f64 omega omega) f))) (*.f64 (-.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)))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))))))))
(if.f64 (<=.f64 sgn #s(literal -499999999999999983668084402058345636924766592903277736458980889735647922960863931304369934227734528 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) req) (*.f64 #s(literal 1/2 binary64) J2)) sgn))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) req) (*.f64 #s(literal 1/2 binary64) J2)) sgn)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 req (*.f64 (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 req (*.f64 (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64))))))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) (*.f64 req (*.f64 (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn))))) (sin.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 req (*.f64 (/.f64 req (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) sgn)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))) #s(literal 3 binary64)) (*.f64 (sin.f64 f) (*.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 2 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (cos.f64 f) e) #s(literal -1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 3 binary64)) #s(literal 1 binary64)))))))
(if.f64 (<=.f64 (+.f64 (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 (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -2 binary64) f)) #s(literal -1 binary64))) (cos.f64 (*.f64 omega #s(literal -2 binary64)))) (*.f64 (sin.f64 (*.f64 f #s(literal -2 binary64))) (sin.f64 (*.f64 omega #s(literal -2 binary64)))))) #s(literal 3 binary64))) (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (/.f64 (neg.f64 (sin.f64 i)) (cos.f64 (+.f64 i (PI.f64)))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 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 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))) #s(literal 3 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (/.f64 (neg.f64 (sin.f64 i)) (cos.f64 (+.f64 i (PI.f64)))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 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 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega) (/.f64 (PI.f64) #s(literal 2 binary64)))) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (/.f64 (neg.f64 (sin.f64 i)) (cos.f64 (+.f64 i (PI.f64)))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 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 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega) (/.f64 (PI.f64) #s(literal 2 binary64)))) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 req (/.f64 req a)) (/.f64 #s(literal 1 binary64) a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) (+.f64 omega omega))) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (sqrt.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) (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (/.f64 (*.f64 (*.f64 e (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 req (/.f64 req a)) (/.f64 #s(literal 1 binary64) a)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) e)) (*.f64 (*.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 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) #s(literal 11 binary64)) #s(literal 1 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (tan.f64 i)))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 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 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega) (/.f64 (PI.f64) #s(literal 2 binary64)))) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 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 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega) (/.f64 (PI.f64) #s(literal 2 binary64)))) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) req) #s(literal 1 binary64)) (*.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) (*.f64 J2 sgn)))) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) (+.f64 omega omega))) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (/.f64 (*.f64 (*.f64 e (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) req) #s(literal 1 binary64)) (*.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) (*.f64 J2 sgn)))) e)) (*.f64 (*.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 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 11 binary64)) #s(literal 1 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (tan.f64 i)))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal +inf.0 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 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 (fabs.f64 (sin.f64 i)) (*.f64 (cos.f64 i) (-.f64 (*.f64 (cos.f64 (-.f64 omega (-.f64 (*.f64 #s(literal -3 binary64) f) omega))) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e)))))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (+.f64 i i) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal 50000000000000003655594109162742628555807976785210253502111881222055621111889642593768170507192870633380534399984881562667451395802621522335273454126423719521965288027138792366781230788927329390738942424252416 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 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 (fabs.f64 (sin.f64 i)) (*.f64 (cos.f64 i) (-.f64 (*.f64 (cos.f64 (-.f64 omega (-.f64 (*.f64 #s(literal -3 binary64) f) omega))) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e)))))))) (+.f64 (/.f64 (*.f64 e (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) J2) sgn) #s(literal 1/8 binary64)) (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))))) (cos.f64 (+.f64 omega omega)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) J2) sgn) #s(literal 1/2 binary64)) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (-.f64 (*.f64 (cos.f64 (-.f64 omega (-.f64 (*.f64 #s(literal -3 binary64) f) omega))) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e))))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal 1000000000000000017865845178806930323739528929966661805443773400559670093686692423675827549619949242079148155740876247260071725785255408160775710807422153542338003433646596020960023924842331815965645472194120710174156699571604284243968 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 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 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 e (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) J2) sgn) #s(literal 1/8 binary64)) (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))))) (cos.f64 (+.f64 omega omega)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) J2) sgn) #s(literal 1/2 binary64)) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (-.f64 (*.f64 (cos.f64 (-.f64 omega (-.f64 (*.f64 #s(literal -3 binary64) f) omega))) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e))))))))
(if.f64 (<=.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 e) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) (tan.f64 i)))) (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))) (*.f64 (*.f64 #s(literal 3 binary64) e) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f)))) (*.f64 e (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f))))))))) #s(literal 1000000000000000017865845178806930323739528929966661805443773400559670093686692423675827549619949242079148155740876247260071725785255408160775710807422153542338003433646596020960023924842331815965645472194120710174156699571604284243968 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 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 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 req (/.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 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 e (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) J2) sgn) #s(literal 1/8 binary64)) (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))))) (cos.f64 (+.f64 omega omega)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) J2) sgn) #s(literal 1/2 binary64)) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (-.f64 (*.f64 (cos.f64 (-.f64 omega (-.f64 (*.f64 #s(literal -3 binary64) f) omega))) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e))))))))
(+.f64 (/.f64 (*.f64 e (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) J2) sgn) #s(literal 1/8 binary64)) (*.f64 e (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 11 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 40 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))))) (cos.f64 (+.f64 omega omega)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) J2) sgn) #s(literal 1/2 binary64)) (cos.f64 i)) (*.f64 (fabs.f64 (sin.f64 i)) (-.f64 (*.f64 (cos.f64 (-.f64 omega (-.f64 (*.f64 #s(literal -3 binary64) f) omega))) e) (*.f64 #s(literal -3 binary64) (+.f64 (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))) (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e)))))))
(-.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 e e)) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 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 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) e) e) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64)))) (*.f64 (tan.f64 i) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i)) (+.f64 (*.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) f) omega) omega)) e) (*.f64 (+.f64 (*.f64 (cos.f64 (+.f64 f (+.f64 omega omega))) e) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)))) #s(literal 3 binary64))))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 e e)) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) J2) sgn) #s(literal -1/2 binary64)) (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i))) (+.f64 (*.f64 (cos.f64 (-.f64 omega (-.f64 (*.f64 #s(literal -3 binary64) f) 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 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 a a) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) J2) sgn)) (*.f64 e e)) (*.f64 (cos.f64 (+.f64 omega omega)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 5/2 binary64)))) (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal 11/2 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (tan.f64 i)))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a) a) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 J2 sgn)) #s(literal -1/2 binary64)) (*.f64 (fabs.f64 (sin.f64 i)) (cos.f64 i))) (+.f64 (*.f64 (cos.f64 (-.f64 omega (-.f64 (*.f64 #s(literal -3 binary64) f) 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 #s(literal 1/16 binary64) (*.f64 (/.f64 req a) J2)) (*.f64 (/.f64 sgn (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (*.f64 (/.f64 req a) (cos.f64 (+.f64 omega omega))) (*.f64 (-.f64 (*.f64 (/.f64 (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))) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)))))
(if.f64 (<=.f64 J2 #s(literal 1942668892225729/3885337784451458141838923813647037813284813678104279042503624819477808570410416996352 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req (cos.f64 (+.f64 omega omega))) (-.f64 (*.f64 (/.f64 (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))) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64)))) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req a) J2)) sgn)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)) (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) J2) (/.f64 (*.f64 req sgn) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) e) (*.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)) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64))) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64)))))))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req (cos.f64 (+.f64 omega omega))) (-.f64 (*.f64 (/.f64 (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))) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64)))) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req a) J2)) sgn)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 e (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req a) J2)) sgn)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (-.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)) (-.f64 (*.f64 #s(literal 5/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -3/2 binary64))) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))))))
(*.f64 (cos.f64 (+.f64 omega omega)) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (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))) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 req a) J2)) sgn)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e)))
(*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (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))) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (*.f64 (cos.f64 (+.f64 omega omega)) #s(literal 1/8 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) a) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) req) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e))
(*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (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))) #s(literal 40 binary64)) (-.f64 (*.f64 #s(literal 11/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -9/2 binary64))) (*.f64 (cos.f64 (+.f64 omega omega)) #s(literal 1/8 binary64))) req) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) a) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) e))
(if.f64 (<=.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) #s(literal +inf.0 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (+.f64 (+.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 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal -3 binary64) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))))) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) J2) a) (/.f64 sgn a)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) J2) a) (/.f64 sgn a)) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) J2) a) (/.f64 sgn a)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal -3 binary64) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal -inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) 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 #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 req (/.f64 req (*.f64 a a))) (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) sgn) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) J2) sgn) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (sin.f64 (+.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 i (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (+.f64 (+.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 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal -3 binary64) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))))))
(if.f64 (<=.f64 (/.f64 req a) #s(literal -20000000000000000038313501714693374724319102545303840223056070291987586484079775119224722902163606470656 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req (neg.f64 a)) (/.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (neg.f64 a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sin.f64 (+.f64 (+.f64 omega omega) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 req (neg.f64 a)) (/.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (neg.f64 a)))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req (neg.f64 a)) (/.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (neg.f64 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 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (*.f64 e e) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (/.f64 req a) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal -3 binary64) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))))))
(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 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) (pow.f64 (sin.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 (*.f64 (/.f64 req (neg.f64 a)) (/.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (neg.f64 a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sin.f64 (+.f64 (+.f64 omega omega) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 req (neg.f64 a)) (/.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (neg.f64 a)))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req (neg.f64 a)) (/.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (neg.f64 a))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))))
(if.f64 (<=.f64 (+.f64 (*.f64 (*.f64 (*.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 req (neg.f64 a)) (/.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (neg.f64 a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (sin.f64 (+.f64 (+.f64 omega omega) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 req (neg.f64 a)) (/.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (neg.f64 a)))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req (neg.f64 a)) (/.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (neg.f64 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 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)))) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega)))))))
(if.f64 (<=.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) (/.f64 req a)) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) 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))) (sin.f64 (+.f64 (+.f64 omega omega) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) req) (*.f64 a a))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) 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))))))))
(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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 req #s(literal 1 binary64)) (*.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 req #s(literal 1 binary64)) (*.f64 a a)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (/.f64 (*.f64 req #s(literal 1 binary64)) (*.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 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) 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))) (sin.f64 (+.f64 (+.f64 omega omega) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) req) (*.f64 a a))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) 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))))))))
(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 -4851619038439715/12129047596099288555851402253613301212944422008724192274523844047078523067862319424459987568973800608988185396071336509423215469094646987433158494336259227650034804500162889887111447543996862850197367181200909912116350366045437952 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) 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))) (sin.f64 (+.f64 (+.f64 omega omega) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) req) (*.f64 a a))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) 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))))))))
(if.f64 (<=.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(literal 8 binary64)) e) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 (*.f64 e (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))) (/.f64 e (+.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) (pow.f64 (/.f64 req a) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 i) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 e #s(literal 2 binary64)))) #s(literal 6 binary64))) (+.f64 (+.f64 e (+.f64 (*.f64 #s(literal 3 binary64) (cos.f64 f)) (*.f64 (*.f64 #s(literal 3 binary64) e) (pow.f64 (cos.f64 f) #s(literal 2 binary64))))) (*.f64 (pow.f64 e #s(literal 2 binary64)) (pow.f64 (cos.f64 f) #s(literal 3 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))))) #s(literal +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (*.f64 #s(literal 1/8 binary64) e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (+.f64 (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e))) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) #s(literal 1/2 binary64)) (*.f64 J2 sgn))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 req (*.f64 a a))) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 f f)))) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (cos.f64 (*.f64 #s(literal -2 binary64) (+.f64 f omega))))))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) J2) sgn) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a)) (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.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 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 req (/.f64 req (*.f64 a a))) (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) sgn) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (sin.f64 (+.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(if.f64 (<=.f64 J2 #s(literal -18492665278881/10273702932711667006330058365000251299903007427389011444332579888806117488861485980690754953667164943802701111047223081470741078613640241920171513223929454785068796232672743355843093277117817807170494632296448 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 req 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 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) (cos.f64 (+.f64 omega omega))) (-.f64 (/.f64 (*.f64 #s(literal -40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 5 binary64)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 11 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 req req) (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (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 #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 #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 req (/.f64 req (*.f64 a a))) (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) sgn) (*.f64 (/.f64 (*.f64 (*.f64 req (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) 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 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) req) (*.f64 a a))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn))) 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 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 #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 req (/.f64 req (*.f64 a a))) (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) (/.f64 e (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) e)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) sgn) (*.f64 (/.f64 (*.f64 (*.f64 req (*.f64 req (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)))) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) #s(literal -1 binary64)) e) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)) #s(literal 3 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (+.f64 (+.f64 (+.f64 (*.f64 (*.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 req)) (*.f64 J2 sgn)) (*.f64 (*.f64 a a) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal -3 binary64) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.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)))) (*.f64 a a)))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.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 #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)))))) (cos.f64 (+.f64 omega omega))))
(+.f64 (*.f64 (-.f64 (*.f64 (*.f64 sgn (*.f64 #s(literal 1/2 binary64) J2)) (/.f64 (*.f64 (*.f64 req req) (+.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 a a))) (*.f64 (*.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) (*.f64 (*.f64 J2 sgn) (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) 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 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.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)))) (*.f64 a a)))))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.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 #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)))))) (cos.f64 (+.f64 omega omega))))
(+.f64 (*.f64 (-.f64 (*.f64 (*.f64 sgn (*.f64 #s(literal 1/2 binary64) J2)) (/.f64 (*.f64 req (*.f64 req (+.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 a a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 req req) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 f) #s(literal 3 binary64)) e) e) e) (*.f64 #s(literal -3 binary64) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 f f)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) e) (cos.f64 f)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.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)))) (*.f64 a a)))) (cos.f64 (*.f64 (+.f64 f omega) #s(literal -2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) e) (-.f64 #s(literal 1 binary64) (*.f64 e e))) (*.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 #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)))))) (cos.f64 (+.f64 omega omega))))
(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 +inf.0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (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 req (*.f64 (/.f64 J2 (+.f64 a a)) (/.f64 (*.f64 sgn 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 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (/.f64 J2 (+.f64 a a)) (/.f64 (*.f64 sgn 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 (/.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 2000000000000000137172103703564102993414188346625929973381646791516038639747754425505775838752679231688970493666459275394749789597812172229456459932366192699143082941239010020801269538891555886778514937042106442934926263917068257100320412740354048 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (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 req (*.f64 (/.f64 J2 (+.f64 a a)) (*.f64 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 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (/.f64 J2 (+.f64 a a)) (*.f64 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 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (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 req (/.f64 (*.f64 (neg.f64 J2) (*.f64 sgn req)) (neg.f64 (*.f64 (+.f64 a 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 req (/.f64 (*.f64 (neg.f64 J2) (*.f64 sgn req)) (neg.f64 (*.f64 (+.f64 a 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 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 5109351192408883/10218702384817765435680628290748613458265350453429542612493041881278524886369096016818984783322294789577433327842265575649138882500575199542984559607218336872038429045509558663769793133795138494375185186532064890845853749530218856391110938974453986086436459043203870933208875495579361330830770176 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 (/.f64 (*.f64 (*.f64 J2 sgn) req) (*.f64 (+.f64 a a) 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 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64))))) (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (/.f64 (*.f64 (*.f64 J2 sgn) req) (+.f64 a 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 #s(literal -3 binary64) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) (*.f64 #s(literal 3 binary64) e))) (*.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 200000000000000004618618260539574309785967644970339855086112915630968437935891537773152359373590152222156477087651714839319838022627174701375205943330738037142406286289327129751793333960704 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64)))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)) (cos.f64 i))))))
(-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) 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 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (/.f64 req (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) a))) (*.f64 #s(literal 1/2 binary64) (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 0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 J2 sgn) req) (+.f64 a a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 J2 sgn) req) (+.f64 a a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 200000000000000004618618260539574309785967644970339855086112915630968437935891537773152359373590152222156477087651714839319838022627174701375205943330738037142406286289327129751793333960704 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64)))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/8 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) #s(literal -2 binary64)) (*.f64 (pow.f64 (cos.f64 i) #s(literal 4 binary64)) #s(literal 200 binary64))) (-.f64 #s(literal -11 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 i i)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 J2 sgn) (/.f64 req (+.f64 a a)))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)) (cos.f64 i))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 J2 sgn) req) (+.f64 a a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 J2 sgn) req) (+.f64 a a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 10000000000000000466018071748206975684050858099493768614209804580186827813230862995727677122141957123210339765959854898653172616660068980913606220974926434405874301273673162218994872058950552383264597357715602427843549593600 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64)))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 J2 sgn) req) (+.f64 a a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 req (/.f64 (*.f64 (*.f64 J2 sgn) req) (+.f64 a a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))))
(-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64)))) (*.f64 (*.f64 (cos.f64 i) e) e))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))
(-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))))))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) (*.f64 e e)) (-.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))) #s(literal 80 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.f64 e (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) #s(literal 3 binary64)) (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))))))))
(if.f64 (<=.f64 J2 #s(literal -1300000000 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64))))) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a))) (*.f64 J2 sgn))) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 (/.f64 (*.f64 (*.f64 J2 sgn) req) (*.f64 (+.f64 a a) 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 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64))))) (*.f64 (*.f64 (*.f64 req (/.f64 (/.f64 (*.f64 (*.f64 J2 sgn) req) (*.f64 (+.f64 a a) a)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.f64 e (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) #s(literal 3 binary64)) (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f)))))))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 i) e) e) (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64))))) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a))) (*.f64 J2 sgn))) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (*.f64 (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))) (/.f64 req (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal -3 binary64) e) (sin.f64 (+.f64 f (+.f64 omega omega)))) (*.f64 (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M) #s(literal 6 binary64))) (*.f64 (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a))) (*.f64 J2 sgn))) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (cos.f64 i) e) e)) (-.f64 (-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64)) #s(literal -40 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))) #s(literal 2 binary64)))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (-.f64 (cos.f64 (+.f64 i i)) #s(literal -1 binary64))))) #s(literal -2 binary64))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 req req) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) a))) (*.f64 J2 sgn)) (*.f64 #s(literal 1/2 binary64) (cos.f64 i)))) (-.f64 (-.f64 (*.f64 #s(literal -3 binary64) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) (*.f64 #s(literal -6 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 f) e) f) M))) (*.f64 e (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) #s(literal 3 binary64)) (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))))))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) i)) (sin.f64 Omega)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) di) (cos.f64 (*.f64 #s(literal -1/2 binary64) i))) (sin.f64 Omega))) (*.f64 (*.f64 (cos.f64 Omega) (sin.f64 (*.f64 #s(literal -1/2 binary64) i))) dOmega))
(-.f64 (*.f64 (sin.f64 Omega) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) di) (cos.f64 (*.f64 #s(literal -1/2 binary64) i))) (sin.f64 (*.f64 #s(literal -1/2 binary64) i)))) (*.f64 (*.f64 (cos.f64 Omega) (sin.f64 (*.f64 #s(literal -1/2 binary64) i))) dOmega))
(+.f64 a (*.f64 a (*.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (/.f64 req a)))) (+.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) (pow.f64 (sin.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)) (-.f64 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))))))
(if.f64 (<=.f64 (+.f64 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 req a) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (-.f64 (*.f64 (-.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 (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #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 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64))))) a))) (+.f64 a (*.f64 a (*.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (/.f64 req a)))) (+.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (-.f64 (*.f64 (+.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 #s(literal 3 binary64) (pow.f64 (sin.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))))))))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal -inf.0 binary64)) (+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (-.f64 (*.f64 (-.f64 #s(literal 3/2 binary64) (*.f64 (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 (*.f64 (cos.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (sin.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f)))))) (*.f64 (-.f64 (/.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64))))) req) (/.f64 req (*.f64 a a)))))) (if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal 9999999999999999860310597602564577717002641838126363875249660735883565852672743849064846414228960666786379280392654615393353172850252103336275952370615397010730691664689375178569039851073146339641623266071126720011020169553304018596457812688561947201171488461172921822139066929851282122002676667750021070848 binary64)) (+.f64 a (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (*.f64 (*.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (sin.f64 i) #s(literal 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 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64))))) a))) (+.f64 a (*.f64 a (/.f64 (*.f64 (*.f64 sgn (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 #s(literal 3/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i 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 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) req))) req) (*.f64 a a))))))
(if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal -inf.0 binary64)) (+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 (/.f64 req a) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 #s(literal 3/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i 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 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) J2))) (/.f64 req a))))) (if.f64 (<=.f64 (/.f64 (*.f64 sgn J2) #s(literal 2 binary64)) #s(literal 9999999999999999860310597602564577717002641838126363875249660735883565852672743849064846414228960666786379280392654615393353172850252103336275952370615397010730691664689375178569039851073146339641623266071126720011020169553304018596457812688561947201171488461172921822139066929851282122002676667750021070848 binary64)) (+.f64 a (*.f64 (/.f64 req a) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req a) #s(literal 1/2 binary64)) (*.f64 J2 sgn)) (-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (*.f64 (*.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (sin.f64 i) #s(literal 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 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64))))) a))) (+.f64 a (*.f64 a (/.f64 (*.f64 (*.f64 sgn (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 #s(literal 3/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i 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 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) req))) req) (*.f64 a a))))))
(+.f64 a (*.f64 a (*.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (*.f64 sgn (/.f64 req a)))) (+.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)))))) (-.f64 (*.f64 (+.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 #s(literal 3 binary64) (pow.f64 (sin.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)))))))))
(+.f64 a (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 req a)) J2) sgn) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -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)) #s(literal 3 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64)))) a) (/.f64 req a))))
(+.f64 a (*.f64 a (*.f64 (/.f64 req a) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 #s(literal 3/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i 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 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) J2) (/.f64 req a))) sgn))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 (*.f64 (/.f64 req a) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 #s(literal 3/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i 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 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) J2))) (/.f64 req a)))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 req (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (*.f64 (+.f64 (neg.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 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) (/.f64 req (*.f64 a a)))))))
(+.f64 a (*.f64 a (*.f64 sgn (*.f64 req (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 omega f) #s(literal -2 binary64))) (pow.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 f) e)) (-.f64 (*.f64 e e) #s(literal 1 binary64))) #s(literal 3 binary64))) (-.f64 #s(literal 3/2 binary64) (*.f64 #s(literal 3/2 binary64) (cos.f64 (+.f64 i 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 #s(literal 3/2 binary64) (cos.f64 (+.f64 i i))) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) J2)) (/.f64 req (*.f64 a a)))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 8371160993642713/167423219872854268898191413915625282900219501828989626163085998182867351738271269139562246689952477832436667643367679191435491450889424069312259024604665231311477621481628609147204290704099549091843034096141351171618467832303105743111961624157454108040174944963852221369694216119572256044331338563584 binary64)) (-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (-.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 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 (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 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.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 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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 e e) (cos.f64 i))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 #s(literal 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 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))))))) (-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/16 binary64)) (+.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal 22 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))) (/.f64 (*.f64 (+.f64 (*.f64 #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 (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 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/8 binary64)) (*.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 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (+.f64 (*.f64 (sin.f64 (+.f64 omega omega)) (cos.f64 (+.f64 f f))) (*.f64 (cos.f64 (+.f64 omega omega)) (sin.f64 (+.f64 f f))))))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 e e) (cos.f64 i)) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) (-.f64 #s(literal 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 #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 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/4 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (+.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 (sin.f64 f) e) (-.f64 M f)) #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)))))))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 8371160993642713/167423219872854268898191413915625282900219501828989626163085998182867351738271269139562246689952477832436667643367679191435491450889424069312259024604665231311477621481628609147204290704099549091843034096141351171618467832303105743111961624157454108040174944963852221369694216119572256044331338563584 binary64)) (-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (-.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 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 (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 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.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 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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 e e) (cos.f64 i))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 #s(literal 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 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))))))) (+.f64 (+.f64 (+.f64 M omega) Omega) (+.f64 (-.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e))) #s(literal 3 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 11 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (neg.f64 (/.f64 (*.f64 #s(literal 40 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 16 binary64)) (*.f64 (+.f64 (+.f64 (+.f64 #s(literal 2 binary64) (*.f64 e e)) (neg.f64 (*.f64 (*.f64 #s(literal 11 binary64) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 e e)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 40 binary64) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 5 binary64) (*.f64 e e)))) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (/.f64 (*.f64 (*.f64 #s(literal 400 binary64) (*.f64 e e)) (pow.f64 (cos.f64 i) #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega))))) (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 6 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))))) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (*.f64 (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (+.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 req a) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 e e) (*.f64 (cos.f64 i) (+.f64 (+.f64 #s(literal 11 binary64) (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i 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 i i)))))))) (/.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)))))) (sin.f64 (*.f64 #s(literal 2 binary64) omega)))) (*.f64 (/.f64 (*.f64 (/.f64 req a) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a)) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 2 binary64)) (*.f64 (cos.f64 i) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 6 binary64) (+.f64 (-.f64 f M) (*.f64 e (sin.f64 f)))) (neg.f64 (*.f64 #s(literal 3 binary64) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 2 binary64) f)))))) (neg.f64 (*.f64 (*.f64 #s(literal 3 binary64) e) (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) f))))) (neg.f64 (*.f64 e (sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) omega) (*.f64 #s(literal 3 binary64) f)))))))))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 8371160993642713/167423219872854268898191413915625282900219501828989626163085998182867351738271269139562246689952477832436667643367679191435491450889424069312259024604665231311477621481628609147204290704099549091843034096141351171618467832303105743111961624157454108040174944963852221369694216119572256044331338563584 binary64)) (-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (-.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 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 (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 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.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 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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 e e) (cos.f64 i))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 #s(literal 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 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))))))) (-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/16 binary64)) (+.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal 22 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))) (/.f64 (*.f64 (+.f64 (*.f64 #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 (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 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/8 binary64)) (*.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 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (sin.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)))))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 e e) (cos.f64 i)) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) (-.f64 #s(literal 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 #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 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/4 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (sin.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)))))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))))) (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) (*.f64 #s(literal -6 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))))))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 8371160993642713/167423219872854268898191413915625282900219501828989626163085998182867351738271269139562246689952477832436667643367679191435491450889424069312259024604665231311477621481628609147204290704099549091843034096141351171618467832303105743111961624157454108040174944963852221369694216119572256044331338563584 binary64)) (-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (-.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 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 (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 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.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 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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 e e) (cos.f64 i))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 #s(literal 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 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))))))) (-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/16 binary64)) (+.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal 22 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))) (/.f64 (*.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 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))))) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) (*.f64 e e)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))) #s(literal -2 binary64))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/8 binary64)) (*.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 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))) #s(literal 11 binary64)) #s(literal 1 binary64))))))) (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (sin.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)))))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 e e) (cos.f64 i)) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64)))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))) #s(literal -2 binary64))))))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (/.f64 req a) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 e e)) (-.f64 #s(literal 1 binary64) (*.f64 e e)))) #s(literal 1/4 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (sin.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)))))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))))) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal -6 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 i i)) #s(literal -1/2 binary64))))))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 8371160993642713/167423219872854268898191413915625282900219501828989626163085998182867351738271269139562246689952477832436667643367679191435491450889424069312259024604665231311477621481628609147204290704099549091843034096141351171618467832303105743111961624157454108040174944963852221369694216119572256044331338563584 binary64)) (-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (-.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 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 (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 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.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 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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 e e) (cos.f64 i))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 #s(literal 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 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))))))) (-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (-.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 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 (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 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e)))) (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.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 req (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.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 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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.f64 a (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 e e) (cos.f64 i))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) #s(literal -11 binary64)) (*.f64 (*.f64 #s(literal -200 binary64) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 req (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) (/.f64 req a))) (*.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 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))))))))
(if.f64 (<=.f64 (pow.f64 (/.f64 req a) #s(literal 2 binary64)) #s(literal 49999999999999996243388080949644102127233543491741923071961298611264709998789651330158174688140882687576502920682776614141952 binary64)) (-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (-.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 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 (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 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.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 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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 e e) (cos.f64 i))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))) (-.f64 #s(literal 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 (*.f64 (*.f64 (/.f64 req (*.f64 a a)) req) J2) sgn) (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 e e) #s(literal 1 binary64)) (-.f64 (*.f64 e e) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))))))) (-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (-.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 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 (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 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e)))) (*.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal 1/16 binary64))) (*.f64 (*.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.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 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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 e e) (cos.f64 i))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i 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 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 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))))))))
(-.f64 (-.f64 (+.f64 Omega (+.f64 omega M)) (*.f64 (sin.f64 (+.f64 omega omega)) (-.f64 (*.f64 (*.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal 1/16 binary64)) (+.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal 22 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))) (/.f64 (*.f64 (+.f64 (*.f64 #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 (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 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal 1/8 binary64)) (*.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 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (sin.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)))))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal 1/8 binary64)) (sin.f64 (+.f64 omega omega))) (*.f64 (*.f64 (*.f64 e e) (cos.f64 i)) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i))))) (-.f64 #s(literal 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 #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 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 #s(literal 3 binary64) (+.f64 (*.f64 e (sin.f64 (+.f64 f (+.f64 omega omega)))) (sin.f64 (*.f64 #s(literal 2 binary64) (+.f64 f omega)))))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) i)))))))) (*.f64 #s(literal -6 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) (-.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 Omega (+.f64 omega M)) (*.f64 (-.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 e e) #s(literal -2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 33 binary64) (*.f64 e e)) #s(literal -22 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i)))))) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 e e) #s(literal 200 binary64)) #s(literal -80 binary64)) (pow.f64 (cos.f64 i) #s(literal 4 binary64))) (-.f64 #s(literal 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 (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 (pow.f64 (cos.f64 i) #s(literal 6 binary64)) #s(literal 400 binary64)) e) e)))) (*.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal 1/16 binary64))) (*.f64 (*.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.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 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))))) (sin.f64 (+.f64 omega omega)))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 i))) (-.f64 (-.f64 (*.f64 (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f)) #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e))) (*.f64 (*.f64 (*.f64 (*.f64 req (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (sin.f64 (+.f64 omega omega)))) (*.f64 (*.f64 e e) (cos.f64 i))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 80 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i 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 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 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 J2 sgn)) req) (*.f64 (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64))) (*.f64 a (-.f64 (*.f64 e e) #s(literal 1 binary64)))))) #s(literal 1/4 binary64)) (+.f64 (*.f64 (sin.f64 (-.f64 (+.f64 omega omega) (*.f64 #s(literal -3 binary64) f))) e) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 f (+.f64 omega omega))) e) (sin.f64 (*.f64 (+.f64 f omega) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 3 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))) (*.f64 (*.f64 #s(literal -6 binary64) (-.f64 (*.f64 (sin.f64 f) e) (-.f64 M f))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 5 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 i i))))))))))
(pow.f64 #s(literal 10 binary64) (-.f64 #s(literal -503/40 binary64) (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 23024/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 6 binary64)) #s(literal 34047/100000 binary64))) (*.f64 (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 4 binary64)) #s(literal -5269/10000 binary64))) (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) (*.f64 (*.f64 #s(literal 100000000/8576481244969 binary64) (-.f64 alt #s(literal 2634/5 binary64))) (-.f64 #s(literal -60713/100000 binary64) (*.f64 #s(literal -10036/2928563 binary64) (-.f64 #s(literal 2634/5 binary64) alt))))))))
(pow.f64 #s(literal 10 binary64) (-.f64 #s(literal -503/40 binary64) (-.f64 (-.f64 (*.f64 #s(literal 23024/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 6 binary64)) #s(literal 34047/100000 binary64))) (-.f64 (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 5 binary64)) #s(literal -5889/10000 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 4 binary64)) #s(literal 5269/10000 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 100000000/8576481244969 binary64) (-.f64 alt #s(literal 2634/5 binary64))) (-.f64 alt #s(literal 2634/5 binary64))) (+.f64 #s(literal 60713/100000 binary64) (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) #s(literal -10036/2928563 binary64)))))))))
(pow.f64 #s(literal 10 binary64) (-.f64 (-.f64 (-.f64 (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) (-.f64 #s(literal 23024/2928563 binary64) (*.f64 (*.f64 (-.f64 #s(literal -60713/100000 binary64) (*.f64 #s(literal 10036/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64)))) #s(literal 100000000/8576481244969 binary64)) (-.f64 #s(literal 2634/5 binary64) alt)))) (*.f64 #s(literal -34047/100000 binary64) (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 5889/10000 binary64) (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 5 binary64)))) (-.f64 (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 4 binary64)) #s(literal 5269/10000 binary64)) #s(literal -503/40 binary64))))
(pow.f64 #s(literal 10 binary64) (-.f64 (*.f64 (pow.f64 (*.f64 #s(literal 10000/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64))) #s(literal 4 binary64)) #s(literal -5269/10000 binary64)) (-.f64 (-.f64 (*.f64 (-.f64 #s(literal 2634/5 binary64) alt) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal -60713/100000 binary64) (*.f64 #s(literal 10036/2928563 binary64) (-.f64 alt #s(literal 2634/5 binary64)))) #s(literal 100000000/8576481244969 binary64)) (-.f64 #s(literal 2634/5 binary64) alt)) #s(literal 23024/2928563 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))))) #s(literal -503/40 binary64))))
(*.f64 (sqrt.f64 (fabs.f64 p)) (sqrt.f64 (fabs.f64 mu)))
(sqrt.f64 (*.f64 mu p))
(/.f64 (+.f64 (neg.f64 N) (-.f64 (-.f64 N (*.f64 (*.f64 N (cosh.f64 N)) e)) (-.f64 N (*.f64 (sinh.f64 N) e)))) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)))
(/.f64 (-.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)) N) (-.f64 N (*.f64 (sinh.f64 N) e))) N) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)))
(/.f64 (-.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)) N) N) (-.f64 N (*.f64 (sinh.f64 N) e))) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 N (/.f64 (-.f64 N (-.f64 (*.f64 (sinh.f64 N) e) N)) (-.f64 #s(literal 1 binary64) (*.f64 (cosh.f64 N) e)))) #s(literal -1 binary64)))
(-.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)))