-16.00218834123335891898837376609722210329`20.339863185292526 + 
 (
   (
    -1.1957726091149288964597463971064900504219723605000118419495`33.79847475\
883914 + 
    (
      0.0138607808088913969826031956789315058692834994131292007345`33.7984747\
5883914*(1 - Sqrt[1 - z])^3)/(1 + Sqrt[1 - z])^3 - 
    (
      0.3491205289900023265096610335341532537361527631465120552231`33.7984747\
58839134*(1 - Sqrt[1 - z])^2)/(1 + Sqrt[1 - z])^2 - 
    (
      1.3892092884980576833734379706699838905891228320891545127888`33.7984747\
5883914*(1 - Sqrt[1 - z]))/(1 + Sqrt[1 - z]))*
   (1 + (1 - Sqrt[1 - z])/(1 + Sqrt[1 - z]))^2)/
  (1 + 
   (
     0.0255543420638892728773734629461748359449191350078230422577`33.79847475\
883914*(1 - Sqrt[1 - z])^3)/(1 + Sqrt[1 - z])^3 - 
   (
     0.2151072253662620395457427331467266873071970087073600577262`33.79847475\
883914*(1 - Sqrt[1 - z])^2)/(1 + Sqrt[1 - z])^2 + 
   (
     0.4287490059460291422090553860786602693353247286618278268226`34.69897000\
433602*(1 - Sqrt[1 - z]))/(1 + Sqrt[1 - z])) - 
 5.16973028776270615399422860475164719976803300412266872133125868787774372437\
35671859143419423518744976958306992250545`96.62158876450613/z^2 + 
 19.6429023487297961562772456901860003061526537881415854356892610784481957561\
44887622646680009394560343324531882615661`97.2386129683655/z - 
 1.62173268380418131754204057022296247813164131903626240257402905913410513387\
412375669109141555516173329359608196552693976098969100199235`97.42762304048053\
*Sqrt[1 - z^(-1)]*Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])] - 
 (1.3240448848219388526498041703939886066028838008291416133001663555032677864\
786873514588673936658081529872721877651344`96.33570161837484*Sqrt[1 - z^(-1)]*
   Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])])/z^2 + 
 (10.452519954406695522817283367131101777689111031247101639542084367919429070\
820363881985321950225562550372721434402514896529396013323093983`97.6343185779\
0606*Sqrt[1 - z^(-1)]*Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])])/
  z + 3.771188656783375769830392175317984651341909234062378337218391397371528\
363728714092059879406744236204013250347178233620358181024368776224`98.5212083\
9217177*(1 + 0.015625`100./z)*
  Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^2 + 
 (0.4395153023478453782386383084840747116502300401523739931127626554797047994\
93365912859190861907027949811426782290972518183283487998709299`96.97316947322\
16*(1 + 0.015625`100./z)*Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^
    2)/z^2 - (6.3349876641360874189580231126824949361187492260753513541667012\
73372277833481144497186823066647739268461477900155078421795043005186099722`98\
.18883724953123*(1 + 0.015625`100./z)*
   Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^2)/z + 
 1.06680417545641979956593920928112538323258307082572552644502935548760750161\
2796074671794866784006778670279580512960036816453533564848668`99.009228957276\
62*Sqrt[1 - z^(-1)]*(1 + 0.25`100./z)*
  Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^3 + 
 (1.2745551122577843924172675791219623280202023899869544346502368214193448506\
92263926275153291944723719292250248793985757041939112856391302`98.40752602121\
04*Sqrt[1 - z^(-1)]*(1 + 0.25`100./z)*
   Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^3)/z^2 - 
 (3.2856970527626507693952265857360548827917248130331850314739412706816157944\
44621701568980600887215337636425289293969738218328741498459811`98.86218603688*
   Sqrt[1 - z^(-1)]*(1 + 0.25`100./z)*
   Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^3)/z + 
 0.07234086245297119532342956466145918663093323972909964099436929577513662499\
2568272899105579690819410969795395869949677789040568501526048`99.272127622231\
58*(1 - 0.015625`100./z)*Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^
   4 + (0.4357263735611865924300608653773282747912022364303687639473831517725\
62493854262884878277992122257502925824594783581216147609564596774631`99.34835\
840275254*(1 - 0.015625`100./z)*
   Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^4)/z^2 - 
 (0.4391154940951113137556570494204734645628568127663249190180532654707735223\
32120895807651146007174790605494641805225789686421700855022165`99.33580834683\
873*(1 - 0.015625`100./z)*Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^
    4)/z + (0.091385225936012579804023064813668066067719438955933246540864346\
07611152613351115965742382781220881696133357327568619509719666738538598`99.69\
897000433602*(1 + 63.`99.99316057546969*z)*pi1[z])/z
