e_mw(i_repeat)
<a name="l00378"></a>00378      <span class="keyword">write</span>(*,<span class="stringliteral">&#39;(a,f40.4)&#39;</span>) <span class="stringliteral">&#39; duration_forward (s) =&#39;</span>, &amp;
<a name="l00379"></a>00379           durations_forward_mw(i_repeat)
<a name="l00380"></a>00380      <span class="keyword">write</span>(*,<span class="stringliteral">&#39;(a,e40.5)&#39;</span>) <span class="stringliteral">&#39; error                =&#39;</span>, &amp;
<a name="l00381"></a>00381 