INCY)</span>
<span class="c">!</span>
<span class="c">!       .. Scalar Arguments ..</span>
<span class="c">!       COMPLEX CA</span>
<span class="c">!       INTEGER INCX,INCY,N</span>
<span class="c">!       ..</span>
<span class="c">!       .. Array Arguments ..</span>
<span class="c">!       COMPLEX CX(*),CY(*)</span>
<span class="c">!       ..</span>
<span class="c">!</span>
<span class="c">!&gt; \par Purpose:</span>
<span class="c">!  =============</span>
<span class="c">!&gt;</span>
<span class="c">!&