abindex="-1"></a>               <span class="dt">array</span>[] <span class="dt">real</span> theta,</span>
<span id="cb7-4"><a href="#cb7-4" aria-hidden="true" tabindex="-1"></a>               <span class="dt">array</span>[] <span class="dt">real</span> x_r,</span>
<span id="cb7-5"><a href="#cb7-5" aria-hidden="true" tabindex="-1"></a>               <span class="dt">array</span>[] <span class="dt">int</span> x_i) {</span>
<span id="cb7-6"><a href="#cb7-6" aria-hidden="true" tabindex="-1"></a>  <span class="