ACE] converts contiguous whitespace to a single character (or nothing) (LICENSE:PD)</p>
<h2><a class="anchor" id="autotoc_md36"></a>
SYNOPSIS</h2>
<pre class="fragment">function compact(STR,CHAR) result (OUTSTR)

 character(len=*),intent(in)          :: STR
 character(len=*),intent(in),optional :: CHAR
 character(len=len(str))              :: OUTSTR
</pre> <h2><a class="anchor" id="autotoc_md37"></a>
DESCRIPTION</h2>
<p>COMPACT(3f) converts multiple spaces, tabs and control characters (called "whitespace") 