, <span class="dt">real</span> rho) {</span>
<span id="cb6-2"><a href="#cb6-2" aria-hidden="true" tabindex="-1"></a>  <span class="cf">if</span> (z1 != <span class="dv">0</span> || z2 != <span class="dv">0</span>) {</span>
<span id="cb6-3"><a href="#cb6-3" aria-hidden="true" tabindex="-1"></a>    <span class="dt">real</span> denom = abs(rho) &lt; <span class="fl">1.0</span> ? sqrt((<span class="dv">1</span> + rho) * (<span class="dv">1</span> - rho))</span>
<span id="cb6-4"><a href="#cb6-4" aria-hidden="tru