">(</span><span class="nb">kind</span><span class="o">=</span><span class="n">rk</span><span class="p">),</span><span class="k">dimension</span><span class="p">(:,:),</span><span class="k">allocatable</span> <span class="kd">::</span> <span class="n">spec</span> <span class="c">!! Spectrum array</span>
  <span class="kt">integer</span> <span class="kd">::</span> <span class="n">nfreq</span><span class="p">,</span><span class="n">nfreqs</span>
  <span class="kt">integer</span> <span class="kd">::</span> <spa