><span class="c">! kludge for bug in ifort (IFORT) 2021.3.0 20210609</span>
<span class="w">   </span><span class="n">ierr</span><span class="o">=</span><span class="n">c_unlink</span><span class="p">(</span><span class="n">temp</span><span class="p">)</span><span class="w"></span>

<span class="k">end function </span><span class="n">system_unlink</span><span class="w"></span>
</pre></div>

    </section>
    <br>
    
    </div>
  </div>

    <hr>    
    </div> <!-- /container -->
    <footer>
      <div 