      </tr>
      </table>
  </td>
  <td class="mlabels-right">
<span class="mlabels"><span class="mlabel">private</span></span>  </td>
  </tr>
</table>
</div><div class="memdoc">
<h2><a class="anchor" id="autotoc_md92"></a>
NAME</h2>
<p>trimzeros(3fp) - [M_strings:NUMERIC] Delete trailing zeros from numeric decimal string (LICENSE:PD) </p>
<h2><a class="anchor" id="autotoc_md93"></a>
SYNOPSIS</h2>
<pre class="fragment">subroutine trimzeros(str)

 character(len=*)  :: str
</pre> <h2><a class="anchor" id="au