n><span class="mf">1.0_wp</span><span class="p">)</span><span class="o">*</span><span class="n">xdel</span>
<span class="w">            </span><span class="n">cmax</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="n">xmin</span><span class="w"> </span><span class="o">+</span><span class="w"> </span><span class="n">ai</span><span class="o">*</span><span class="n">xdel</span>
<span class="w">            </span><span class="k">WRITE</span><span class="w"> </span><span c