</span>
    <span class="nv">write</span><span class="ss">(</span><span class="o">*</span>,<span class="s1">&#39;</span><span class="s">(1x,a,*(a:,&quot;+&quot;))</span><span class="s1">&#39;</span><span class="ss">)</span> <span class="s1">&#39;</span><span class="s">UPPER(3f) is elemental ==&gt;</span><span class="s1">&#39;</span>,<span class="o">&amp;</span>
    <span class="o">&amp;</span> <span class="nv">upper</span><span class="ss">(</span>[<span class="s2">&quot;</span><span class="s">abc</span><spa