-19.55183873028841648440161141986404545499`20.426871414045472 + 
 (
   (
    -1.205505653508754436916225416755027153418627528969652917956`34.741479127\
32569 - 
    (
      0.2623630390553270008662324016506948451132331449316608206238`34.7414791\
2732569*(1 - Sqrt[1 - z])^3)/(1 + Sqrt[1 - z])^3 - 
    (
      1.2293627356916620473901124676620150285221182146510607149147`34.7414791\
2732569*(1 - Sqrt[1 - z])^2)/(1 + Sqrt[1 - z])^2 - 
    (
      2.1419420004129203626412522178754506219246255136900063631621`34.7414791\
2732569*(1 - Sqrt[1 - z]))/(1 + Sqrt[1 - z]))*
   (1 + (1 - Sqrt[1 - z])/(1 + Sqrt[1 - z]))^2)/
  (1 - 
   (
     0.0192645702350003621501354904494915560262112359201571570406`34.74147912\
732569*(1 - Sqrt[1 - z])^3)/(1 + Sqrt[1 - z])^3 - 
   (
     0.0957787988050742496029162704890939984081190528710900294178`34.74147912\
732569*(1 - Sqrt[1 - z])^2)/(1 + Sqrt[1 - z])^2 + 
   (
     0.8547791944978819688042295746481295779250379703536960727504`34.69897000\
433602*(1 - Sqrt[1 - z]))/(1 + Sqrt[1 - z])) - 
 2.28949699236868751189555639074869601206315623490095203004448813854575245509\
2094078471443654481307330767817801732221`96.25302698362744/z^2 + 
 24.3534101111748290556387502444423462339264825471109197918817933775557013615\
803969080247474480025797609290703434690571`97.31858764497309/z - 
 1.75247050118949679541799521152394724651992900275940395181428955638347315069\
3981874557510925214452281515468905168258886811091878424964337`97.479810993828\
24*Sqrt[1 - z^(-1)]*Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])] - 
 (1.1304268790551327043802267741491801873621572496436886284117428595330364433\
343655422490739531927132476364824792045104`96.2489283534507*Sqrt[1 - z^(-1)]*
   Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])])/z^2 + 
 (12.511706852285378359716237043470073552798780006179651882222093534508510537\
598167291459218045875548200623238177481294044519129102774953194`97.7142405981\
9326*Sqrt[1 - z^(-1)]*Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])])/
  z + 4.330863190394463195036913321068608224582939978407096682920894844738925\
763211923873792434717959889617852697017771635128385462516914235764`98.6015606\
5565073*(1 + 0.015625`100./z)*
  Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^2 + 
 (0.6994223295688708193080783097838220447626475978908787468502345610277386614\
46652274904889046600327855104592496152566022933417050196953221`97.12321937612\
563*(1 + 0.015625`100./z)*Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^
    2)/z^2 - (7.3449249671494982931209211088640607910063675922663089388674626\
52623397759189125764683446838751778536052617967976368287107218705148204879`98\
.2489253020237*(1 + 0.015625`100./z)*
   Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^2)/z + 
 1.18413269887558523976223712935211207619995686024653880436173286985117255661\
5940240078976439194405677434665061474069910004022594777008144`99.075669199268\
33*Sqrt[1 - z^(-1)]*(1 + 0.015625`100./z)*
  Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^3 + 
 (0.5788570388518122347348618944945961210920576838540375591931366363513058781\
10230089238810508067210611511118994661886126791899201981265356`98.00173788701\
066*Sqrt[1 - z^(-1)]*(1 + 0.015625`100./z)*
   Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^3)/z^2 - 
 (3.3097108109409034036482966505706737624875631000967543157964262454987650608\
79274779088717890011785595753564437231498247344783387865123065`98.85955586051\
278*Sqrt[1 - z^(-1)]*(1 + 0.015625`100./z)*
   Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^3)/z + 
 0.07972886542689165782454577552050182696770940038228428518102828768408674839\
6064607152631255914562669962455351192838155520687264859128707`99.337075560511\
68*(1 - 0.0625`100./z)*Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^
   4 + (0.4403181403195443763944757480863997463010862096397658066192158306296\
87208482322668410630434959054128314935033063027645913152972274283145`99.34200\
880312507*(1 - 0.0625`100./z)*
   Log[(-1 + Sqrt[1 - z^(-1)])/(1 + Sqrt[1 - z^(-1)])]^4)/z^2 - 
 (0.4669256358699888136447638576513172873260954241982763795990288402039337106\
23574312496913115296940501283501186799949130388889775788174365`99.37491497396\
066*(1 - 0.0625`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
