 class="kd">::</span> <span class="n">Y_Z</span>

    <span class="kt">INTEGER</span>                                                <span class="kd">::</span> <span class="n">pp</span>
    <span class="c">!! Iterator.</span>

    <span class="c">!$OMP SIMD</span>
<span class="c">!    !$OMP&amp; aligned(Y_R,Y_PHI,Y_Z,X_X,X_Y,X_Z)</span>
    <span class="k">do </span><span class="n">pp</span><span class="o">=</span><span class="mi">1_idef</span><span class="p">,</span><span class="n">pchunk</span>
       <sp