span><span class="p">(</span><span class="nb">kind</span><span class="o">=</span><span class="n">ik</span><span class="p">)</span> <span class="kd">::</span> <span class="n">idm</span><span class="p">,</span><span class="n">jdm</span><span class="p">,</span><span class="n">mdm</span>

  <span class="n">mdm</span> <span class="o">=</span> <span class="n">size</span><span class="p">(</span><span class="n">f</span><span class="p">,</span><span class="nb">dim</span><span class="o">=</span><span class="mi">1</sp