repeat) = time_end - time_start
<a name="l00176"></a>00176         errors_dh_real(i_repeat) = maxval(abs(flm_orig(0:L**2-1) - flm_syn(0:L**2-1)))
<a name="l00177"></a>00177         <span class="keyword">write</span>(*,<span class="stringliteral">&#39;(a,f40.4)&#39;</span>) <span class="stringliteral">&#39; duration_inverse (s) =&#39;</span>, &amp;
<a name="l00178"></a>00178              durations_inverse_dh_real(i_repeat)
<a name="l00179"></a>00179         <span class="keyword">write</span>(*,<span class="s