lass="k">pure subroutine </span><span class="n">assign_array_1d</span><span class="p">(</span><span class="n">self</span><span class="p">,</span><span class="k">array</span><span class="p">)</span>
  <span class="c">!! Assigns a 1-d array of reals to a `spectrum` instance. This procedure</span>
  <span class="c">!! overloads the assignment (&#39;=&#39;) operator.</span>
  <span class="k">class</span><span class="p">(</span><span class="n">spectrum_type</span><span class="p">),</span><span class="k">intent</