rors_gl_real(i_repeat)
<a name="l00210"></a>00210         <span class="keyword">write</span>(*,*)
<a name="l00211"></a>00211 
<a name="l00212"></a>00212         <span class="comment">!=========================================================================</span>
<a name="l00213"></a>00213         <span class="comment">! MWEO real spin=0</span>
<a name="l00214"></a>00214         <span class="keyword">write</span>(*,<span class="stringliteral">&#39;(a,i2)&#39;</span>) <span class="stringliteral">&#39;MWEO r