/span><span class="k">pure elemental </span><span class="kt">integer </span><span class="k">function </span><span class="n">lt</span><span class="p">(</span><span class="n">ia</span><span class="p">,</span><span class="n">ib</span><span class="p">)</span>
<span class="c">! ident_14=&quot;@(#) M_strings lt(3f) logical to integer TRUE results in 0 FALSE results in 1&quot;</span>
<span class="kt">integer</span><span class="p">,</span><span class="k">intent</span><span class="p">(</span><span class="n">in</span