an class="o">=&gt;</span> <span class="n">xdmf_str_contiguous_hyperslab_WriteGeometry</span>
        <span class="k">procedure</span>         <span class="kd">::</span> <span class="n">WriteGeometry_VXVYVZ</span>         <span class="o">=&gt;</span> <span class="n">xdmf_str_contiguous_hyperslab_WriteGeometry_VXVYVZ</span>
        <span class="k">procedure</span>         <span class="kd">::</span> <span class="n">WriteGeometry_DXDYDZ</span>         <span class="o">=&gt;</span> <span class="n">xdmf_str_contig