242         <span class="comment">! MW real spin=0</span>
<a name="l00243"></a>00243         <span class="keyword">write</span>(*,<span class="stringliteral">&#39;(a,i2)&#39;</span>) <span class="stringliteral">&#39;MW real spin=0 test no.&#39;</span>, i_repeat
<a name="l00244"></a>00244         flm_orig(0:L**2-1) = cmplx(0d0, 0d0)
<a name="l00245"></a>00245         flm_syn(0:L**2-1) = cmplx(0d0, 0d0)
<a name="l00246"></a>00246         call <a class="code" href="ssht__test_8f90.html#a38f7ebbfee8c28f88b922ca