ss="nv">none</span>
 <span class="nv">character</span><span class="ss">(</span><span class="nv">len</span><span class="o">=</span><span class="mi">10</span><span class="ss">)</span>,<span class="nv">allocatable</span> :: <span class="nv">string</span><span class="ss">(</span>:<span class="ss">)</span>
 <span class="nv">integer</span>                       :: <span class="nv">i</span>
    <span class="nv">string</span><span class="o">=</span>[<span class="o">&amp;</span>
    <span class="o">&amp;</span> <spa