eal spin=0 test no.&#39;</span>, i_repeat
<a name="l00215"></a>00215         flm_orig(0:L**2-1) = cmplx(0d0, 0d0)
<a name="l00216"></a>00216         flm_syn(0:L**2-1) = cmplx(0d0, 0d0)
<a name="l00217"></a>00217         call <a class="code" href="ssht__test_8f90.html#a38f7ebbfee8c28f88b922ca179618a98">ssht_test_gen_flm_real</a>(L, flm_orig, seed)
<a name="l00218"></a>00218         call cpu_time(time_start)
<a name="l00219"></a>00219         <span class="comment">!--------------------------------------------