NDDO</span>
<span class="c">!</span>
<span class="c">!     DEFINE THE LENGTH OF THE 2 MOVING AVERAGES</span>
<span class="c">!</span>
<span class="w">         </span><span class="n">lenma1</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="mf">1.0_wp</span><span class="o">/</span><span class="n">F</span>
<span class="w">         </span><span class="n">lenma2</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="mf">1.0_wp</span><sp